Mercurial > emacs
comparison lisp/term/vt300.el @ 83353:532e0a9335a9
Merged in changes from CVS trunk. Plus added lisp/term tweaks.
Patches applied:
* lorentey@elte.hu--2004/emacs--cvs-trunk--0--base-0
tag of miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-474
* lorentey@elte.hu--2004/emacs--cvs-trunk--0--patch-1
Add CVS metadata files.
* lorentey@elte.hu--2004/emacs--cvs-trunk--0--patch-2
Update from CVS.
git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-393
author | Karoly Lorentey <lorentey@elte.hu> |
---|---|
date | Sun, 04 Sep 2005 03:48:17 +0000 |
parents | 7372c2f9daac af1c58687bdd |
children | 7d093d9d4479 |
comparison
equal
deleted
inserted
replaced
83352:b258b3492423 | 83353:532e0a9335a9 |
---|---|
1 ;; -*- no-byte-compile: t -*- | 1 ;; -*- no-byte-compile: t -*- |
2 (load "term/vt100" nil t) | 2 (defun terminal-init-vt300 () |
3 | 3 "Terminal initialization function for vt300." |
4 ;; Make F11 an escape key. | 4 (terminal-init-vt100) |
5 (define-key (terminal-local-value 'local-function-key-map nil) "\e[23~" [?\e]) | 5 ;; Make F11 an escape key. |
6 (define-key (terminal-local-value 'local-function-key-map nil) "\e[23~" [?\e])) | |
6 | 7 |
7 ;;; arch-tag: 876831c9-a6f2-444a-b033-706e6fbc149f | 8 ;;; arch-tag: 876831c9-a6f2-444a-b033-706e6fbc149f |
8 ;;; vt300.el ends here | 9 ;;; vt300.el ends here |