|
18 | 18 | # CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
|
19 | 19 |
|
20 | 20 | reader_emacs_keymap = tuple(
|
21 |
| - [(r'\C-a', 'beginning-of-line'), |
22 |
| - (r'\C-b', 'left'), |
23 |
| - (r'\C-c', 'interrupt'), |
24 |
| - (r'\C-d', 'delete'), |
25 |
| - (r'\C-e', 'end-of-line'), |
26 |
| - (r'\C-f', 'right'), |
27 |
| - (r'\C-g', 'cancel'), |
28 |
| - (r'\C-h', 'backspace'), |
29 |
| - (r'\C-j', 'self-insert'), |
30 |
| - (r'\<return>', 'accept'), |
31 |
| - (r'\C-k', 'kill-line'), |
32 |
| - (r'\C-l', 'clear-screen'), |
33 |
| -# (r'\C-m', 'accept'), |
34 |
| - (r'\C-q', 'quoted-insert'), |
35 |
| - (r'\C-t', 'transpose-characters'), |
36 |
| - (r'\C-u', 'unix-line-discard'), |
37 |
| - (r'\C-v', 'quoted-insert'), |
38 |
| - (r'\C-w', 'unix-word-rubout'), |
39 |
| - (r'\C-x\C-u', 'upcase-region'), |
40 |
| - (r'\C-y', 'yank'), |
41 |
| - (r'\C-z', 'suspend'), |
42 |
| - |
43 |
| - (r'\M-b', 'backward-word'), |
44 |
| - (r'\M-c', 'capitalize-word'), |
45 |
| - (r'\M-d', 'kill-word'), |
46 |
| - (r'\M-f', 'forward-word'), |
47 |
| - (r'\M-l', 'downcase-word'), |
48 |
| - (r'\M-t', 'transpose-words'), |
49 |
| - (r'\M-u', 'upcase-word'), |
50 |
| - (r'\M-y', 'yank-pop'), |
51 |
| - (r'\M--', 'digit-arg'), |
52 |
| - (r'\M-0', 'digit-arg'), |
53 |
| - (r'\M-1', 'digit-arg'), |
54 |
| - (r'\M-2', 'digit-arg'), |
55 |
| - (r'\M-3', 'digit-arg'), |
56 |
| - (r'\M-4', 'digit-arg'), |
57 |
| - (r'\M-5', 'digit-arg'), |
58 |
| - (r'\M-6', 'digit-arg'), |
59 |
| - (r'\M-7', 'digit-arg'), |
60 |
| - (r'\M-8', 'digit-arg'), |
61 |
| - (r'\M-9', 'digit-arg'), |
62 |
| - (r'\M-\n', 'self-insert'), |
63 |
| - (r'\<backslash>', 'self-insert')] + \ |
64 |
| - [(c, 'self-insert') |
65 |
| - for c in map(chr, range(32, 127)) if c <> '\\'] + \ |
66 |
| - [(c, 'self-insert') |
67 |
| - for c in map(chr, range(128, 256)) if c.isalpha()] + \ |
68 |
| - [(r'\<up>', 'up'), |
69 |
| - (r'\<down>', 'down'), |
70 |
| - (r'\<left>', 'left'), |
71 |
| - (r'\<right>', 'right'), |
72 |
| - (r'\<insert>', 'quoted-insert'), |
73 |
| - (r'\<delete>', 'delete'), |
74 |
| - (r'\<backspace>', 'backspace'), |
75 |
| - (r'\M-\<backspace>', 'backward-kill-word'), |
76 |
| - (r'\<end>', 'end'), |
77 |
| - (r'\<home>', 'home'), |
78 |
| - (r'\<f1>', 'help'), |
79 |
| - (r'\EOF', 'end'), # the entries in the terminfo database for xterms |
80 |
| - (r'\EOH', 'home'), # seem to be wrong. this is a less than ideal |
81 |
| - # workaround |
82 |
| - ]) |
| 21 | + [ |
| 22 | + (r"\C-a", "beginning-of-line"), |
| 23 | + (r"\C-b", "left"), |
| 24 | + (r"\C-c", "interrupt"), |
| 25 | + (r"\C-d", "delete"), |
| 26 | + (r"\C-e", "end-of-line"), |
| 27 | + (r"\C-f", "right"), |
| 28 | + (r"\C-g", "cancel"), |
| 29 | + (r"\C-h", "backspace"), |
| 30 | + (r"\C-j", "self-insert"), |
| 31 | + (r"\<return>", "accept"), |
| 32 | + (r"\C-k", "kill-line"), |
| 33 | + (r"\C-l", "clear-screen"), |
| 34 | + # (r'\C-m', 'accept'), |
| 35 | + (r"\C-q", "quoted-insert"), |
| 36 | + (r"\C-t", "transpose-characters"), |
| 37 | + (r"\C-u", "unix-line-discard"), |
| 38 | + (r"\C-v", "quoted-insert"), |
| 39 | + (r"\C-w", "unix-word-rubout"), |
| 40 | + (r"\C-x\C-u", "upcase-region"), |
| 41 | + (r"\C-y", "yank"), |
| 42 | + (r"\C-z", "suspend"), |
| 43 | + (r"\M-b", "backward-word"), |
| 44 | + (r"\M-c", "capitalize-word"), |
| 45 | + (r"\M-d", "kill-word"), |
| 46 | + (r"\M-f", "forward-word"), |
| 47 | + (r"\M-l", "downcase-word"), |
| 48 | + (r"\M-t", "transpose-words"), |
| 49 | + (r"\M-u", "upcase-word"), |
| 50 | + (r"\M-y", "yank-pop"), |
| 51 | + (r"\M--", "digit-arg"), |
| 52 | + (r"\M-0", "digit-arg"), |
| 53 | + (r"\M-1", "digit-arg"), |
| 54 | + (r"\M-2", "digit-arg"), |
| 55 | + (r"\M-3", "digit-arg"), |
| 56 | + (r"\M-4", "digit-arg"), |
| 57 | + (r"\M-5", "digit-arg"), |
| 58 | + (r"\M-6", "digit-arg"), |
| 59 | + (r"\M-7", "digit-arg"), |
| 60 | + (r"\M-8", "digit-arg"), |
| 61 | + (r"\M-9", "digit-arg"), |
| 62 | + (r"\M-\n", "self-insert"), |
| 63 | + (r"\<backslash>", "self-insert"), |
| 64 | + ] |
| 65 | + + [(c, "self-insert") for c in map(chr, range(32, 127)) if c != "\\"] |
| 66 | + + [(c, "self-insert") for c in map(chr, range(128, 256)) if c.isalpha()] |
| 67 | + + [ |
| 68 | + (r"\<up>", "up"), |
| 69 | + (r"\<down>", "down"), |
| 70 | + (r"\<left>", "left"), |
| 71 | + (r"\<right>", "right"), |
| 72 | + (r"\<insert>", "quoted-insert"), |
| 73 | + (r"\<delete>", "delete"), |
| 74 | + (r"\<backspace>", "backspace"), |
| 75 | + (r"\M-\<backspace>", "backward-kill-word"), |
| 76 | + (r"\<end>", "end"), |
| 77 | + (r"\<home>", "home"), |
| 78 | + (r"\<f1>", "help"), |
| 79 | + (r"\EOF", "end"), # the entries in the terminfo database for xterms |
| 80 | + (r"\EOH", "home"), # seem to be wrong. this is a less than ideal |
| 81 | + # workaround |
| 82 | + ] |
| 83 | +) |
83 | 84 |
|
84 | 85 | hist_emacs_keymap = reader_emacs_keymap + (
|
85 | 86 | (r'\C-n', 'next-history'),
|
|
98 | 99 | python_emacs_keymap = comp_emacs_keymap + (
|
99 | 100 | (r'\n', 'maybe-accept'),
|
100 | 101 | (r'\M-\n', 'self-insert'))
|
101 |
| - |
| 102 | + |
102 | 103 | reader_vi_insert_keymap = tuple(
|
103 |
| - [(c, 'self-insert') |
104 |
| - for c in map(chr, range(32, 127)) if c <> '\\'] + \ |
105 |
| - [(c, 'self-insert') |
106 |
| - for c in map(chr, range(128, 256)) if c.isalpha()] + \ |
107 |
| - [(r'\C-d', 'delete'), |
108 |
| - (r'\<backspace>', 'backspace'), |
109 |
| - ('')]) |
| 104 | + [(c, "self-insert") for c in map(chr, range(32, 127)) if c != "\\"] |
| 105 | + + [(c, "self-insert") for c in map(chr, range(128, 256)) if c.isalpha()] |
| 106 | + + [(r"\C-d", "delete"), (r"\<backspace>", "backspace"), ("")] |
| 107 | +) |
110 | 108 |
|
111 | 109 | reader_vi_command_keymap = tuple(
|
112 | 110 | [
|
113 |
| - ('E', 'enter-emacs-mode'), |
114 |
| - ('R', 'enter-replace-mode'), |
115 |
| - ('dw', 'delete-word'), |
116 |
| - ('dd', 'delete-line'), |
117 |
| - |
118 |
| - ('h', 'left'), |
119 |
| - ('i', 'enter-insert-mode'), |
120 |
| - ('j', 'down'), |
121 |
| - ('k', 'up'), |
122 |
| - ('l', 'right'), |
123 |
| - ('r', 'replace-char'), |
124 |
| - ('w', 'forward-word'), |
125 |
| - ('x', 'delete'), |
126 |
| - ('.', 'repeat-edit'), # argh! |
127 |
| - (r'\<insert>', 'enter-insert-mode'), |
128 |
| - ] + |
129 |
| - [(c, 'digit-arg') for c in '01234567689'] + |
130 |
| - []) |
131 |
| - |
| 111 | + ("E", "enter-emacs-mode"), |
| 112 | + ("R", "enter-replace-mode"), |
| 113 | + ("dw", "delete-word"), |
| 114 | + ("dd", "delete-line"), |
| 115 | + ("h", "left"), |
| 116 | + ("i", "enter-insert-mode"), |
| 117 | + ("j", "down"), |
| 118 | + ("k", "up"), |
| 119 | + ("l", "right"), |
| 120 | + ("r", "replace-char"), |
| 121 | + ("w", "forward-word"), |
| 122 | + ("x", "delete"), |
| 123 | + (".", "repeat-edit"), # argh! |
| 124 | + (r"\<insert>", "enter-insert-mode"), |
| 125 | + ] |
| 126 | + + [(c, "digit-arg") for c in "01234567689"] |
| 127 | + + [] |
| 128 | +) |
| 129 | + |
132 | 130 |
|
133 | 131 | reader_keymaps = {
|
134 | 132 | 'emacs' : reader_emacs_keymap,
|
|
137 | 135 | }
|
138 | 136 |
|
139 | 137 | del c # from the listcomps
|
140 |
| - |
0 commit comments