Mercurial > emacs
changeset 81381:bf9ea781e3e0
* term/xterm.el (terminal-init-xterm): Escape parens in character
constants.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 13 Jun 2007 18:48:09 +0000 |
| parents | db32b7ba9c76 |
| children | dbd9a7dfa004 |
| files | lisp/ChangeLog lisp/term/xterm.el |
| diffstat | 2 files changed, 11 insertions(+), 6 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/ChangeLog Wed Jun 13 18:25:46 2007 +0000 +++ b/lisp/ChangeLog Wed Jun 13 18:48:09 2007 +0000 @@ -1,3 +1,8 @@ +2007-06-13 Johan Bockg,Ae(Brd <bojohan@dd.chalmers.se> (tiny change) + + * term/xterm.el (terminal-init-xterm): Escape parens in character + constants. + 2007-06-13 Stefan Monnier <monnier@iro.umontreal.ca> * progmodes/sh-script.el: Remove unneeded * from docstrings.
--- a/lisp/term/xterm.el Wed Jun 13 18:25:46 2007 +0000 +++ b/lisp/term/xterm.el Wed Jun 13 18:48:09 2007 +0000 @@ -272,8 +272,8 @@ (define-key map "\e[27;6;36~" [?\C-$]) (define-key map "\e[27;6;37~" [?\C-%]) (define-key map "\e[27;6;38~" [?\C-&]) - (define-key map "\e[27;6;40~" [?\C-(]) - (define-key map "\e[27;6;41~" [?\C-)]) + (define-key map "\e[27;6;40~" [?\C-\(]) + (define-key map "\e[27;6;41~" [?\C-\)]) (define-key map "\e[27;6;42~" [?\C-*]) (define-key map "\e[27;6;43~" [?\C-+]) (define-key map "\e[27;6;58~" [?\C-:]) @@ -312,8 +312,8 @@ (define-key map "\e[27;14;36~" [?\C-\M-$]) (define-key map "\e[27;14;37~" [?\C-\M-%]) (define-key map "\e[27;14;38~" [?\C-\M-&]) - (define-key map "\e[27;14;40~" [?\C-\M-(]) - (define-key map "\e[27;14;41~" [?\C-\M-)]) + (define-key map "\e[27;14;40~" [?\C-\M-\(]) + (define-key map "\e[27;14;41~" [?\C-\M-\)]) (define-key map "\e[27;14;42~" [?\C-\M-*]) (define-key map "\e[27;14;43~" [?\C-\M-+]) (define-key map "\e[27;14;58~" [?\C-\M-:]) @@ -350,8 +350,8 @@ (define-key map "\e[27;8;36~" [?\C-\M-$]) (define-key map "\e[27;8;37~" [?\C-\M-%]) (define-key map "\e[27;8;38~" [?\C-\M-&]) - (define-key map "\e[27;8;40~" [?\C-\M-(]) - (define-key map "\e[27;8;41~" [?\C-\M-)]) + (define-key map "\e[27;8;40~" [?\C-\M-\(]) + (define-key map "\e[27;8;41~" [?\C-\M-\)]) (define-key map "\e[27;8;42~" [?\C-\M-*]) (define-key map "\e[27;8;43~" [?\C-\M-+]) (define-key map "\e[27;8;58~" [?\C-\M-:])