changeset 72145:947c480fb7e0

(terminal-init-xterm): Fix bindings for C-tab, S-tab and C-S-tab.
author Dan Nicolaescu <dann@ics.uci.edu>
date Thu, 27 Jul 2006 18:31:23 +0000
parents 2824d0383afd
children 233adf3cfb3c
files lisp/ChangeLog lisp/term/xterm.el
diffstat 2 files changed, 8 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/ChangeLog	Thu Jul 27 12:18:03 2006 +0000
+++ b/lisp/ChangeLog	Thu Jul 27 18:31:23 2006 +0000
@@ -1,3 +1,8 @@
+2006-07-27  Dan Nicolaescu  <dann@ics.uci.edu>
+
+	* term/xterm.el (terminal-init-xterm): Fix bindings for C-tab,
+	S-tab and C-S-tab.
+
 2006-07-28  Nick Roberts  <nickrob@snap.net.nz>
 
 	* progmodes/which-func.el (which-function): Fix documentation/
--- a/lisp/term/xterm.el	Thu Jul 27 12:18:03 2006 +0000
+++ b/lisp/term/xterm.el	Thu Jul 27 18:31:23 2006 +0000
@@ -230,17 +230,17 @@
       
       ;; These keys are available in xterm starting from version 214
       ;; if the modifyOtherKeys resource is set to 1.
-      (define-key map "\e[27;5;9~"  [?\C-\t])
+      (define-key map "\e[27;5;9~"  [C-tab])
       (define-key map "\e[27;5;13~" [C-return])
       (define-key map "\e[27;5;44~" [?\C-,])
       (define-key map "\e[27;5;46~" [?\C-.])
       (define-key map "\e[27;5;47~" [?\C-/])
       (define-key map "\e[27;5;92~" [?\C-\\])
 
-      (define-key map "\e[27;2;9~"  [?\S-\t])
+      (define-key map "\e[27;2;9~"  [S-tab])
       (define-key map "\e[27;2;13~" [S-return])
 
-      (define-key map "\e[27;6;9~"  [?\C-\S-\t])
+      (define-key map "\e[27;6;9~"  [(C-S-tab)])
 
       (define-key map "\e[27;13;46~" [?\C-\M-.])