diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/ChangeLog | 4 | ||||
| -rw-r--r-- | lisp/term/xterm.el | 8 |
2 files changed, 12 insertions, 0 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 7437f4aed99..e4179428136 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,7 @@ +2006-05-08 Dan Nicolaescu <dann@ics.uci.edu> + + * term/xterm.el (terminal-init-xterm): Add more key bindings. + 2006-05-08 Stefan Monnier <monnier@iro.umontreal.ca> * mwheel.el (mwheel-scroll): Make sure that when scrolling multiple diff --git a/lisp/term/xterm.el b/lisp/term/xterm.el index 9cb7253b642..9ce9f34da96 100644 --- a/lisp/term/xterm.el +++ b/lisp/term/xterm.el @@ -227,6 +227,14 @@ (define-key map "\e[4~" [select]) (define-key map "\e[29~" [print]) + + ;; These keys will be available xterm starting probably from + ;; version 214. + (define-key map "\e[27;5;8~" [(control ?\t)]) + (define-key map "\e[27;5;44~" [(control ?\,)]) + (define-key map "\e[27;5;46~" [(control ?\.)]) + (define-key map "\e[27;5;47~" [(control ?\/)]) + (define-key map "\e[27;5;92~" [(control ?\\)]) ;; Other versions of xterm might emit these. (define-key map "\e[A" [up]) |