|
0
|
1 ;; Define function key sequences for DEC terminals.
|
|
|
2
|
|
|
3 ;; Termcap or terminfo should set these.
|
|
|
4 ;; (define-key function-key-map "\e[A" [up])
|
|
|
5 ;; (define-key function-key-map "\e[B" [down])
|
|
|
6 ;; (define-key function-key-map "\e[C" [right])
|
|
|
7 ;; (define-key function-key-map "\e[D" [left])
|
|
|
8
|
|
|
9 (define-key function-key-map "\e[1~" [find])
|
|
|
10 (define-key function-key-map "\e[2~" [insert])
|
|
|
11 (define-key function-key-map "\e[3~" [delete])
|
|
|
12 (define-key function-key-map "\e[4~" [select])
|
|
|
13 (define-key function-key-map "\e[5~" [prior])
|
|
|
14 (define-key function-key-map "\e[6~" [next])
|
|
|
15 (define-key function-key-map "\e[11~" [f1])
|
|
|
16 (define-key function-key-map "\e[12~" [f2])
|
|
|
17 (define-key function-key-map "\e[13~" [f3])
|
|
|
18 (define-key function-key-map "\e[14~" [f4])
|
|
|
19 (define-key function-key-map "\e[15~" [f5])
|
|
|
20 (define-key function-key-map "\e[17~" [f6])
|
|
|
21 (define-key function-key-map "\e[18~" [f7])
|
|
|
22 (define-key function-key-map "\e[19~" [f8])
|
|
|
23 (define-key function-key-map "\e[20~" [f9])
|
|
|
24 (define-key function-key-map "\e[21~" [f10])
|
|
|
25 ;; Customarily F11 is used as the ESC key.
|
|
|
26 ;; The file that includes this one, takes care of that.
|
|
|
27 (define-key function-key-map "\e[23~" [f11])
|
|
|
28 (define-key function-key-map "\e[24~" [f12])
|
|
|
29 (define-key function-key-map "\e[25~" [f13])
|
|
|
30 (define-key function-key-map "\e[26~" [f14])
|
|
|
31 (define-key function-key-map "\e[28~" [help])
|
|
|
32 (define-key function-key-map "\e[29~" [menu])
|
|
|
33 (define-key function-key-map "\e[31~" [f17])
|
|
|
34 (define-key function-key-map "\e[32~" [f18])
|
|
|
35 (define-key function-key-map "\e[33~" [f19])
|
|
|
36 (define-key function-key-map "\e[34~" [f20])
|
|
|
37
|
|
|
38 ;; Termcap or terminfo should set these.
|
|
|
39 ;; (define-key function-key-map "\eOA" [up])
|
|
|
40 ;; (define-key function-key-map "\eOB" [down])
|
|
|
41 ;; (define-key function-key-map "\eOC" [right])
|
|
|
42 ;; (define-key function-key-map "\eOD" [left])
|
|
|
43
|
|
|
44 ;; Termcap or terminfo should set these, but doesn't properly.
|
|
|
45 ;; Termcap sets these to k1-k4, which get mapped to f1-f4 in term.c
|
|
|
46 (define-key function-key-map "\eOP" [kp_f1])
|
|
|
47 (define-key function-key-map "\eOQ" [kp_f2])
|
|
|
48 (define-key function-key-map "\eOR" [kp_f3])
|
|
|
49 (define-key function-key-map "\eOS" [kp_f4])
|
|
|
50
|
|
|
51 (define-key function-key-map "\eOI" [kp_tab])
|
|
|
52 (define-key function-key-map "\eOj" [kp_multiply])
|
|
|
53 (define-key function-key-map "\eOk" [kp_add])
|
|
|
54 (define-key function-key-map "\eOl" [kp_separator])
|
|
|
55 (define-key function-key-map "\eOM" [kp_enter])
|
|
|
56 (define-key function-key-map "\eOm" [kp_subtract])
|
|
|
57 (define-key function-key-map "\eOn" [kp_decimal])
|
|
|
58 (define-key function-key-map "\eOo" [kp_divide])
|
|
|
59 (define-key function-key-map "\eOp" [kp_0])
|
|
|
60 (define-key function-key-map "\eOq" [kp_1])
|
|
|
61 (define-key function-key-map "\eOr" [kp_2])
|
|
|
62 (define-key function-key-map "\eOs" [kp_3])
|
|
|
63 (define-key function-key-map "\eOt" [kp_4])
|
|
|
64 (define-key function-key-map "\eOu" [kp_5])
|
|
|
65 (define-key function-key-map "\eOv" [kp_6])
|
|
|
66 (define-key function-key-map "\eOw" [kp_7])
|
|
|
67 (define-key function-key-map "\eOx" [kp_8])
|
|
|
68 (define-key function-key-map "\eOy" [kp_9])
|
