]> code.delx.au - gnu-emacs/blobdiff - lisp/term/vt420.el
(date, entry, number, original-date): Add defvars.
[gnu-emacs] / lisp / term / vt420.el
index a4a0a6e359a4c32516acbeb9b646cb890828cc84..65ffa759c17758eb67e38eb38e08e96bec7867db 100644 (file)
@@ -1,4 +1,9 @@
-(load "term/vt100" nil t)
+;; -*- no-byte-compile: 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