mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-18 10:16:51 +00:00
290af74003
Not that compiling these will bring any noticeable speed benefit, but there's really no reason not to compile them. The extra disk space and build time is negligible, and it might reveal use of obsolete functions, bugs, etc.
11 lines
432 B
EmacsLisp
11 lines
432 B
EmacsLisp
;; For our purposes we can treat the vt200 and vt100 almost alike.
|
|
;; Most differences are handled by the termcap entry.
|
|
(defun terminal-init-vt220 ()
|
|
"Terminal initialization function for vt220."
|
|
(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]))
|
|
|
|
;;; vt220.el ends here
|