1 |
;; -*- no-byte-compile: t -*- |
;; -*- no-byte-compile: t -*- |
2 |
;; For our purposes we can treat the vt200 and vt100 almost alike. |
;; For our purposes we can treat the vt200 and vt100 almost alike. |
3 |
;; Most differences are handled by the termcap entry. |
;; Most differences are handled by the termcap entry. |
4 |
(load "term/vt100" nil t) |
(defun terminal-init-vt220 () |
5 |
|
"Terminal initialization function for vt220." |
6 |
;; Make F11 an escape key. |
(load "term/vt100" nil t) |
7 |
(define-key function-key-map "\e[23~" [?\e]) |
;; Make F11 an escape key. |
8 |
|
(define-key function-key-map "\e[23~" [?\e])) |
9 |
|
|
10 |
;;; arch-tag: 98fc4867-a20d-46a1-a276-d7be31e49871 |
;;; arch-tag: 98fc4867-a20d-46a1-a276-d7be31e49871 |
11 |
;;; vt220.el ends here |
;;; vt220.el ends here |