summaryrefslogtreecommitdiff
path: root/lisp/term/vt200.el
diff options
context:
space:
mode:
authorDan Nicolaescu <dann@ics.uci.edu>2005-07-27 18:02:08 +0000
committerDan Nicolaescu <dann@ics.uci.edu>2005-07-27 18:02:08 +0000
commit4f0c9ba732c47b273fdb409f258570eae51b94e9 (patch)
tree2b2f23fe3a7a598dd1ec0d82edf35bc9ef3ed808 /lisp/term/vt200.el
parente890842c416274d634b715defeab4528cd260373 (diff)
downloademacs-4f0c9ba732c47b273fdb409f258570eae51b94e9.tar.gz
* term/apollo.el (terminal-init-apollo): New function containing
all former top level forms in the file. * term/bobcat.el (terminal-init-bobcat): * term/cygwin.el (terminal-init-cygwin): * term/iris-ansi.el (terminal-init-iris-ansi): * term/linux.el (terminal-init-linux): * term/news.el (terminal-init-news): * term/rxvt.el (terminal-init-rxvt): * term/sun.el (terminal-init-sun): * term/tvi970.el (terminal-init-tvi970): * term/vt100.el (terminal-init-vt100): * term/vt102.el (terminal-init-vt102): * term/vt125.el (terminal-init-vt125): * term/vt200.el (terminal-init-vt200): * term/vt201.el (terminal-init-vt201): * term/vt220.el (terminal-init-vt220): * term/vt240.el (terminal-init-vt240): * term/vt300.el (terminal-init-vt300): * term/vt320.el (terminal-init-vt320): * term/vt400.el (terminal-init-vt400): * term/vt420.el (terminal-init-vt420): * term/wyse50.el (terminal-init-wyse50): * term/xterm.el (terminal-init-xterm): Likewise. * term/README: Describe the terminal-init-* functionality. * startup.el (command-line): After loading the terminal initialization file call the corresponding terminal initialization function.
Diffstat (limited to 'lisp/term/vt200.el')
-rw-r--r--lisp/term/vt200.el8
1 files changed, 5 insertions, 3 deletions
diff --git a/lisp/term/vt200.el b/lisp/term/vt200.el
index 0ff0a30f567..e1215d15023 100644
--- a/lisp/term/vt200.el
+++ b/lisp/term/vt200.el
@@ -1,10 +1,12 @@
;; -*- no-byte-compile: t -*-
;; For our purposes we can treat the vt200 and vt100 almost alike.
;; Most differences are handled by the termcap entry.
-(load "term/vt100" nil t)
-;; Make F11 an escape key.
-(define-key function-key-map "\e[23~" [?\e])
+(defun terminal-init-vt200 ()
+ "Terminal initialization function for vt200."
+ (load "term/vt100" nil t)
+ ;; Make F11 an escape key.
+ (define-key function-key-map "\e[23~" [?\e]))
;;; arch-tag: 0f78f583-9f32-4237-b106-28bcfff21d89
;;; vt200.el ends here