Mercurial > emacs
diff lisp/term/vt400.el @ 83716:a73440d2f146 merge-multi-tty-to-trunk
Merge multi-tty branch
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-866
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Wed, 29 Aug 2007 05:28:10 +0000 |
| parents | 673d62ad74b5 |
| children | 528714e93230 bdb3fe0ba9fa |
line wrap: on
line diff
--- a/lisp/term/vt400.el Wed Aug 29 01:14:48 2007 +0000 +++ b/lisp/term/vt400.el Wed Aug 29 05:28:10 2007 +0000 @@ -1,9 +1,9 @@ ;; -*- no-byte-compile: t -*- (defun terminal-init-vt400 () - "Terminal initialization function for vt400." - (load "term/vt100" nil t) + "Terminal initialization function for vt400." + (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: a70809c5-6b21-42cc-ba20-536683e5e7d5 ;;; vt400.el ends here