Mercurial > emacs

annotate lisp/term/vt200.el @ 9445:712af9626dc0

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(read_key_sequence): The output of function-key-map goes to key-translation-map, but not vice versa. Don't exit if either of them is a possibility.
author Richard M. Stallman <rms@gnu.org>
date Tue, 11 Oct 1994 09:22:44 +0000
parents 73eb72de291d
children 67b464da13ec
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3848
73eb72de291d Translate F11 (ESC [ 23 ~) to ESC.
Richard M. Stallman <rms@gnu.org>
parents: 3289
diff changeset
1 ;; For our purposes we can treat the vt200 and vt100 almost alike.
73eb72de291d Translate F11 (ESC [ 23 ~) to ESC.
Richard M. Stallman <rms@gnu.org>
parents: 3289
diff changeset
2 ;; Most differences are handled by the termcap entry.
3289
e010fc52b552 Just load vt100.el.
Richard M. Stallman <rms@gnu.org>
parents: 779
diff changeset
3 (load "term/vt100" nil t)
3848
73eb72de291d Translate F11 (ESC [ 23 ~) to ESC.
Richard M. Stallman <rms@gnu.org>
parents: 3289
diff changeset
4
73eb72de291d Translate F11 (ESC [ 23 ~) to ESC.
Richard M. Stallman <rms@gnu.org>
parents: 3289
diff changeset
5 ;; Make F11 an escape key.
73eb72de291d Translate F11 (ESC [ 23 ~) to ESC.
Richard M. Stallman <rms@gnu.org>
parents: 3289
diff changeset
6 (define-key function-key-map "\e[23~" [?\e])