[Emacs-diffs] Changes to emacs/lisp/term/vt420.el,v

[Miles Bader]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Miles Bader <miles>     07/08/29 05:28:10

Index: lisp/term/vt420.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/term/vt420.el,v
retrieving revision 1.5
retrieving revision 1.6
diff -u -b -r1.5 -r1.6
--- lisp/term/vt420.el  27 Jul 2005 18:02:07 -0000      1.5
+++ lisp/term/vt420.el  29 Aug 2007 05:27:59 -0000      1.6
@@ -1,9 +1,9 @@
 ;; -*- no-byte-compile: t -*-
-(defun terminal-init-vt420 ()
+(defun terminal-init-vt420
   "Terminal initialization function for vt420."  
-  (load "term/vt100" nil t)
+  (tty-run-terminal-initialization (selected-frame) "vt100")
   ;; Make F11 an escape key.
-  (define-key function-key-map "\e[23~" [?\e]))
+  (define-key local-function-key-map "\e[23~" [?\e]))
 
 ;;; arch-tag: df2f897c-3a12-4b3c-9259-df089f96c160
 ;;; vt420.el ends here