Mercurial > emacs

diff lisp/term/vt420.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/vt420.el	Sun Jan 15 23:02:10 2006 +0000
+++ b/lisp/term/vt420.el	Mon Jan 16 00:03:54 2006 +0000
@@ -1,7 +1,9 @@
 ;; -*- no-byte-compile: t -*-
-(load "term/vt100" nil t)
+(defun terminal-init-vt420 ()
+  "Terminal initialization function for vt420."  
+  (load "term/vt100" nil t)
+  ;; Make F11 an escape key.
+  (define-key function-key-map "\e[23~" [?\e]))
 
-;; Make F11 an escape key.
-(define-key function-key-map "\e[23~" [?\e])
-
+;;; arch-tag: df2f897c-3a12-4b3c-9259-df089f96c160
 ;;; vt420.el ends here