diff options
| author | Dan Nicolaescu <dann@ics.uci.edu> | 2007-09-14 22:59:16 +0000 |
|---|---|---|
| committer | Dan Nicolaescu <dann@ics.uci.edu> | 2007-09-14 22:59:16 +0000 |
| commit | 42ac3301fb1157a31b0895f7ab67217179ae816b (patch) | |
| tree | 4683018d0d24755760d9627566b672a2d6f16063 /lisp/term | |
| parent | b5883dcf11a72d44cfdf6cca05836bcc8ef76916 (diff) | |
| download | emacs-42ac3301fb1157a31b0895f7ab67217179ae816b.tar.gz | |
(terminal-init-xterm): Add C-M- bindings.
Diffstat (limited to 'lisp/term')
| -rw-r--r-- | lisp/term/xterm.el | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el index 903298495fb..1f06499153f 100644 --- a/lisp/term/xterm.el +++ b/lisp/term/xterm.el @@ -217,6 +217,13 @@ (define-key map "\e[1;6F" [C-S-end]) (define-key map "\e[1;6H" [C-S-home]) + (define-key map "\e[1;7A" [C-M-up]) + (define-key map "\e[1;7B" [C-M-down]) + (define-key map "\e[1;7C" [C-M-right]) + (define-key map "\e[1;7D" [C-M-left]) + (define-key map "\e[1;7F" [C-M-end]) + (define-key map "\e[1;7H" [C-M-home]) + (define-key map "\e[1;8A" [C-M-S-up]) (define-key map "\e[1;8B" [C-M-S-down]) (define-key map "\e[1;8C" [C-M-S-right]) @@ -256,6 +263,11 @@ (define-key map "\e[5;6~" [C-S-prior]) (define-key map "\e[6;6~" [C-S-next]) + (define-key map "\e[2;7~" [C-M-insert]) + (define-key map "\e[3;7~" [C-M-delete]) + (define-key map "\e[5;7~" [C-M-prior]) + (define-key map "\e[6;7~" [C-M-next]) + (define-key map "\e[2;8~" [C-M-S-insert]) (define-key map "\e[3;8~" [C-M-S-delete]) (define-key map "\e[5;8~" [C-M-S-prior]) |