view lisp/term/vt320.el @ 106656:5b3e8e51b723
Merge: update nt/INSTALL for CVS->Bazaar switchover too.
author |
Karl Fogel <kfogel@red-bean.com> |
date |
Sun, 27 Dec 2009 18:40:41 -0500 (2009-12-27) |
parents |
528714e93230 |
children |
4bc33ffdda1a ef719132ddfa |
line source
;; -*- no-byte-compile: t -*-
(defun terminal-init-vt320 ()
"Terminal initialization function for vt320."
(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: f9f4c954-0b9e-45f9-b450-a320d32abd9c
;;; vt320.el ends here