* term/apollo.el (terminal-init-apollo): New function containing

[gnu-emacs] / lisp / term / bobcat.el

diff --git a/lisp/term/bobcat.el b/lisp/term/bobcat.el
index b11a4ff8309c9389f836d9b708668187f1f0f463..82401f7bf71873510c3b0f214c8ea0ca214ca6da 100644 (file)
--- a/lisp/term/bobcat.el
+++ b/lisp/term/bobcat.el
@@ -1,7 +1,10 @@
 ;; -*- no-byte-compile: t -*-
-;;; HP terminals usually encourage using ^H as the rubout character
-(keyboard-translate ?\177 ?\^h)
-(keyboard-translate ?\^h ?\177)
+
+(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