blob: 5e1a71556f1d2a55254f2bc0673c6358a6e6d0b0 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
$NetBSD: patch-aj,v 1.2 2000/07/10 18:26:54 tron Exp $
--- mg.rc.orig Wed May 31 16:36:33 2000
+++ mg.rc Wed May 31 16:36:33 2000
@@ -0,0 +1,51 @@
+; Small key definition file for VT100 terminals using the termcap
+; driver. This only works if XKEYS is defined during compilation.
+;
+(global-set-key "\e[A" 'previous-line) ; VT100 small keypad up arrow
+(global-set-key "\e[B" 'next-line) ; VT100 small keypad down arrow
+(global-set-key "\e[C" 'forward-char) ; VT100 small keypad right arrow
+(global-set-key "\e[D" 'backward-char) ; VT100 small keypad left arrow
+(global-set-key "\^H" 'delete-backward-char)
+;
+(global-set-key "\eOA" 'previous-line) ; MS TELNET small keypad up arrow
+(global-set-key "\eOB" 'next-line) ; MS TELNET small keypad down arrow
+(global-set-key "\eOC" 'forward-char) ; MS TELNET small keypad right arrow
+(global-set-key "\eOD" 'backward-char) ; MS TELNET small keypad left arrow
+;
+; The following pairs are for the PC running EM4010 and the VT220 respectively
+; They affect only the far right application keypad:
+;
+(global-set-key "\e\eA" 'previous-line) ; PC keypad up arrow
+(global-set-key "\eOx" 'previous-line) ; VT keypad 8
+(global-set-key "\e\eB" 'next-line) ; PC keypad down arrow
+(global-set-key "\eOr" 'next-line) ; VT keypad 2
+(global-set-key "\e\eC" 'forward-char) ; PC keypad right arrow
+(global-set-key "\eOv" 'forward-char) ; VT keypad 6
+(global-set-key "\e\eD" 'backward-char) ; PC keypad left arrow
+(global-set-key "\eOt" 'backward-char) ; VT keypad 4
+(global-set-key "\e\017n" 'delete-char) ; PC keypad del
+(global-set-key "\e\On" 'delete-char) ; VT keypad .
+(global-set-key "\e\017s" 'scroll-up) ; PC keypad PgUp
+(global-set-key "\eOs" 'scroll-up) ; VT keypad 9
+(global-set-key "\e\017y" 'scroll-down) ; PC keypad PgUp
+(global-set-key "\e\Oy" 'scroll-down) ; VT keypad 3
+(global-set-key "\e\017w" 'beginning-of-line) ; PC keypad Home
+(global-set-key "\eOw" 'beginning-of-line) ; VT keypad 7
+(global-set-key "\e\017q" 'end-of-line) ; PC keypad End
+(global-set-key "\e\Oq" 'end-of-line) ; VT keypad 1
+(global-set-key "\e\017M" 'fill-paragraph) ; PC keypad +
+(global-set-key "\eOM" 'fill-paragraph) ; VT keypad Enter
+(global-set-key "\eOn" 'fill-paragraph) ; cute keypad enter
+(global-set-key "\e\017u" 'query-replace) ; PC keypad 5
+(global-set-key "\e\Ou" 'query-replace) ; VT keypad 5
+
+(global-set-key "\eOP" 'start-kbd-macro) ; PC F1 key
+(global-set-key "\eOQ" 'end-kbd-macro) ; PC F2 key
+(global-set-key "\eOS" 'call-last-kbd-macro) ; PC F4 key
+;
+; For the SUN type 2 keyboard under NetBSD:
+;
+(global-set-key "\e[215z" 'previous-line) ; keypad up arrow
+(global-set-key "\e[221z" 'next-line) ; keypad down arrow
+(global-set-key "\e[219z" 'forward-char) ; keypad right arrow
+(global-set-key "\e[217z" 'backward-char) ; keypad left arrow
|
