view lisp/term/vt400.el @ 102915:5200e3730ccd
(cua--indent-rectangle): Insert tabs using
tab-to-tab-stop to respect indent-tabs-mode.
| author |
Kim F. Storm <storm@cua.dk> |
| date |
Thu, 09 Apr 2009 17:13:54 +0000 (2009-04-09) |
| 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
