Mercurial > emacs

diff lisp/term/bobcat.el @ 88155:d7ddb3e565de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync with trunk
author Henrik Enberg <henrik.enberg@telia.com>
date Mon, 16 Jan 2006 00:03:54 +0000
parents 33d53d287ee4
children
line wrap: on
line diff
--- a/lisp/term/bobcat.el	Sun Jan 15 23:02:10 2006 +0000
+++ b/lisp/term/bobcat.el	Mon Jan 16 00:03:54 2006 +0000
@@ -1,5 +1,10 @@
 ;; -*- no-byte-compile: t -*-
-;;; HP terminals usually encourage using ^H as the rubout character
-(load "term/keyswap" nil t)
 
+(defun terminal-init-bobcat ()
+  "Terminal initialization function for bobcat."  
+  ;; HP terminals usually encourage using ^H as the rubout character
+  (keyboard-translate ?\177 ?\^h)
+  (keyboard-translate ?\^h ?\177))
+
+;;; arch-tag: 754e4520-0a3e-4e6e-8ca5-9481b1f85cf7
 ;;; bobcat.el ends here