diff options
Diffstat (limited to 'lisp/term/bobcat.el')
-rw-r--r-- | lisp/term/bobcat.el | 11 |
1 files changed, 1 insertions, 10 deletions
diff --git a/lisp/term/bobcat.el b/lisp/term/bobcat.el index 7abe538ef77..f106b8b75c2 100644 --- a/lisp/term/bobcat.el +++ b/lisp/term/bobcat.el @@ -1,11 +1,2 @@ ;;; HP terminals usually encourage using ^H as the rubout character - -(let ((the-table (make-string 128 0))) - (let ((i 0)) - (while (< i 128) - (aset the-table i i) - (setq i (1+ i)))) - ;; Swap ^H and DEL - (aset the-table ?\177 ?\^h) - (aset the-table ?\^h ?\177) - (setq keyboard-translate-table the-table)) +(load "term/keyswap" nil t) |