Mercurial > emacs
comparison lisp/term/news.el @ 494:393e90d2071b
*** empty log message ***
author | Jim Blandy <jimb@redhat.com> |
---|---|
date | Wed, 15 Jan 1992 19:43:09 +0000 |
parents | 4ddaee1a9029 |
children | b43b95612c90 |
comparison
equal
deleted
inserted
replaced
493:8b101799ff37 | 494:393e90d2071b |
---|---|
20 | 20 |
21 ;; This file places entries in function-key-map for the raw escape | 21 ;; This file places entries in function-key-map for the raw escape |
22 ;; sequences of various keypad and function keys, binding them to | 22 ;; sequences of various keypad and function keys, binding them to |
23 ;; their symbolic forms. | 23 ;; their symbolic forms. |
24 | 24 |
25 (define-prefix-command 'news-fkey-prefix 'news-fkey-map) | 25 (define-prefix-command 'news-fkey-prefix) |
26 (define-key function-key-map "\eO" 'news-fkey-prefix) | 26 (define-key function-key-map "\eO" 'news-fkey-prefix) |
27 | 27 |
28 (define-key news-fkey-map "P" [f1]) | 28 (define-key news-fkey-prefix "P" [f1]) |
29 (define-key news-fkey-map "Q" [f2]) | 29 (define-key news-fkey-prefix "Q" [f2]) |
30 (define-key news-fkey-map "R" [f3]) | 30 (define-key news-fkey-prefix "R" [f3]) |
31 (define-key news-fkey-map "S" [f4]) | 31 (define-key news-fkey-prefix "S" [f4]) |
32 (define-key news-fkey-map "T" [f5]) | 32 (define-key news-fkey-prefix "T" [f5]) |
33 (define-key news-fkey-map "U" [f6]) | 33 (define-key news-fkey-prefix "U" [f6]) |
34 (define-key news-fkey-map "V" [f7]) | 34 (define-key news-fkey-prefix "V" [f7]) |
35 (define-key news-fkey-map "W" [f8]) | 35 (define-key news-fkey-prefix "W" [f8]) |
36 (define-key news-fkey-map "X" [f9]) | 36 (define-key news-fkey-prefix "X" [f9]) |
37 (define-key news-fkey-map "Y" [f10]) | 37 (define-key news-fkey-prefix "Y" [f10]) |
38 (define-key news-fkey-map "m" [kp-subtract]) | 38 (define-key news-fkey-prefix "m" [kp-subtract]) |
39 (define-key news-fkey-map "k" [kp-add]) | 39 (define-key news-fkey-prefix "k" [kp-add]) |
40 (define-key news-fkey-map "l" [kp-separator]) | 40 (define-key news-fkey-prefix "l" [kp-separator]) |
41 (define-key news-fkey-map "n" [kp-period]) | 41 (define-key news-fkey-prefix "n" [kp-period]) |
42 (define-key news-fkey-map "M" [kp-enter]) | 42 (define-key news-fkey-prefix "M" [kp-enter]) |
43 (define-key news-fkey-map "p" [kp-0]) | 43 (define-key news-fkey-prefix "p" [kp-0]) |
44 (define-key news-fkey-map "q" [kp-1]) | 44 (define-key news-fkey-prefix "q" [kp-1]) |
45 (define-key news-fkey-map "r" [kp-2]) | 45 (define-key news-fkey-prefix "r" [kp-2]) |
46 (define-key news-fkey-map "s" [kp-3]) | 46 (define-key news-fkey-prefix "s" [kp-3]) |
47 (define-key news-fkey-map "t" [kp-4]) | 47 (define-key news-fkey-prefix "t" [kp-4]) |
48 (define-key news-fkey-map "u" [kp-5]) | 48 (define-key news-fkey-prefix "u" [kp-5]) |
49 (define-key news-fkey-map "v" [kp-6]) | 49 (define-key news-fkey-prefix "v" [kp-6]) |
50 (define-key news-fkey-map "w" [kp-7]) | 50 (define-key news-fkey-prefix "w" [kp-7]) |
51 (define-key news-fkey-map "x" [kp-8]) | 51 (define-key news-fkey-prefix "x" [kp-8]) |
52 (define-key news-fkey-map "y" [kp-9]) | 52 (define-key news-fkey-prefix "y" [kp-9]) |
53 (define-key news-fkey-map "a" [execute]) | 53 (define-key news-fkey-prefix "a" [execute]) |
54 (define-key news-fkey-map "b" [select]) | 54 (define-key news-fkey-prefix "b" [select]) |
55 (define-key news-fkey-map "c" [cancel]) | 55 (define-key news-fkey-prefix "c" [cancel]) |