Mercurial > emacs
view lisp/term/vt420.el @ 105523:54704a452681
* net/tramp.el (tramp-file-name-real-user, tramp-file-name-domain)
(tramp-file-name-real-host, tramp-file-name-port): Apply
`save-match-data.
author | Michael Albinus <michael.albinus@gmx.de> |
---|---|
date | Thu, 08 Oct 2009 15:19:56 +0000 |
parents | 712b0413cdc1 |
children | ef719132ddfa |
line wrap: on
line source
;; -*- no-byte-compile: t -*- (defun terminal-init-vt420 () "Terminal initialization function for vt420." (tty-run-terminal-initialization (selected-frame) "vt100") ;; Make F11 an escape key. (define-key input-decode-map "\e[23~" [f11]) ;Probably redundant. (define-key local-function-key-map [f11] [?\e])) ;; arch-tag: df2f897c-3a12-4b3c-9259-df089f96c160 ;;; vt420.el ends here