comparison lisp/term/xterm.el @ 84545:4abcc15327e8

(xterm-function-map): Add C-M- bindings.
author Dan Nicolaescu <dann@ics.uci.edu>
date Fri, 14 Sep 2007 02:09:19 +0000
parents 83341575ba12
children d90048b1caa3
comparison
equal deleted inserted replaced
84544:ad1f1cc765cf 84545:4abcc15327e8
146 (define-key map "\e[1;6C" [C-S-right]) 146 (define-key map "\e[1;6C" [C-S-right])
147 (define-key map "\e[1;6D" [C-S-left]) 147 (define-key map "\e[1;6D" [C-S-left])
148 (define-key map "\e[1;6F" [C-S-end]) 148 (define-key map "\e[1;6F" [C-S-end])
149 (define-key map "\e[1;6H" [C-S-home]) 149 (define-key map "\e[1;6H" [C-S-home])
150 150
151 (define-key map "\e[1;7A" [C-M-up])
152 (define-key map "\e[1;7B" [C-M-down])
153 (define-key map "\e[1;7C" [C-M-right])
154 (define-key map "\e[1;7D" [C-M-left])
155 (define-key map "\e[1;7F" [C-M-end])
156 (define-key map "\e[1;7H" [C-M-home])
157
151 (define-key map "\e[1;8A" [C-M-S-up]) 158 (define-key map "\e[1;8A" [C-M-S-up])
152 (define-key map "\e[1;8B" [C-M-S-down]) 159 (define-key map "\e[1;8B" [C-M-S-down])
153 (define-key map "\e[1;8C" [C-M-S-right]) 160 (define-key map "\e[1;8C" [C-M-S-right])
154 (define-key map "\e[1;8D" [C-M-S-left]) 161 (define-key map "\e[1;8D" [C-M-S-left])
155 (define-key map "\e[1;8F" [C-M-S-end]) 162 (define-key map "\e[1;8F" [C-M-S-end])
184 191
185 (define-key map "\e[2;6~" [C-S-insert]) 192 (define-key map "\e[2;6~" [C-S-insert])
186 (define-key map "\e[3;6~" [C-S-delete]) 193 (define-key map "\e[3;6~" [C-S-delete])
187 (define-key map "\e[5;6~" [C-S-prior]) 194 (define-key map "\e[5;6~" [C-S-prior])
188 (define-key map "\e[6;6~" [C-S-next]) 195 (define-key map "\e[6;6~" [C-S-next])
196
197 (define-key map "\e[2;7~" [C-M-insert])
198 (define-key map "\e[3;7~" [C-M-delete])
199 (define-key map "\e[5;7~" [C-M-prior])
200 (define-key map "\e[6;7~" [C-M-next])
189 201
190 (define-key map "\e[2;8~" [C-M-S-insert]) 202 (define-key map "\e[2;8~" [C-M-S-insert])
191 (define-key map "\e[3;8~" [C-M-S-delete]) 203 (define-key map "\e[3;8~" [C-M-S-delete])
192 (define-key map "\e[5;8~" [C-M-S-prior]) 204 (define-key map "\e[5;8~" [C-M-S-prior])
193 (define-key map "\e[6;8~" [C-M-S-next]) 205 (define-key map "\e[6;8~" [C-M-S-next])