Mercurial > emacs

annotate lisp/term/vt200.el @ 22226:557fac086b1b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(ascii_skip_code): New variable. (detect_coding_mask): Skip ASCII codes at the head according to ascii_skip_code. (coding_priorities): New variable. (Fset_coding_priority_internal): New function. (detect_coding): Call set_coding_mask with coding_priorities as arg CODING. (init_coding_once): Initialize ascii_skip_code. (syms_of_coding): Declare set-coding-priority-internal as a Lisp function.
author Kenichi Handa <handa@m17n.org>
date Mon, 25 May 1998 08:08:07 +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])