view lisp/term/vt400.el @ 87003:c24d6306ce07
*** empty log message ***
author |
Richard M. Stallman <rms@gnu.org> |
date |
Mon, 03 Dec 2007 00:33:35 +0000 (2007-12-03) |
parents |
528714e93230 |
children |
4bc33ffdda1a ef719132ddfa |
line source
;; -*- no-byte-compile: t -*-
(defun terminal-init-vt400 ()
"Terminal initialization function for vt400."
(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: a70809c5-6b21-42cc-ba20-536683e5e7d5
;;; vt400.el ends here