annotate lisp/term/vt220.el @ 41290:9985a0fdea47

(mouse-wheel-scroll-amount): Allow float values. (mouse-wheel-scroll-amount): New var. (mwheel-scroll): Use it and handle float values.
author Stefan Monnier <monnier@iro.umontreal.ca>
date Mon, 19 Nov 2001 21:57:30 +0000
parents 67b464da13ec
children 33d53d287ee4
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
3807
8ba66a564213 entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 3290
diff changeset
1 ;; For our purposes we can treat the vt200 and vt100 almost alike.
8ba66a564213 entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 3290
diff changeset
2 ;; Most differences are handled by the termcap entry.
3290
1064f75f0d34 Initial revision
Richard M. Stallman <rms@gnu.org>
parents:
diff changeset
3 (load "term/vt100" nil t)
3807
8ba66a564213 entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 3290
diff changeset
4
8ba66a564213 entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 3290
diff changeset
5 ;; Make F11 an escape key.
8ba66a564213 entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 3290
diff changeset
6 (define-key function-key-map "\e[23~" [?\e])
8ba66a564213 entered into RCS
Richard M. Stallman <rms@gnu.org>
parents: 3290
diff changeset
7
38414
67b464da13ec Some fixes to follow coding conventions.
Pavel Janík <Pavel@Janik.cz>
parents: 3807
diff changeset
8 ;;; vt220.el ends here