Mercurial > emacs
changeset 78005:3049bd99b03e
* term/xterm.el (terminal-init-xterm): Escape parens in character
constants.
| author | Dan Nicolaescu <dann@ics.uci.edu> |
|---|---|
| date | Wed, 13 Jun 2007 19:08:44 +0000 |
| parents | 919d04a3deda |
| children | a8c400af8ac9 |
| 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 00:45:03 2007 +0000 +++ b/lisp/ChangeLog Wed Jun 13 19:08:44 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-12 Ralf Angeli <angeli@caeruleus.net> * scroll-lock.el (scroll-lock-mode): Doc fix.
--- a/lisp/term/xterm.el Wed Jun 13 00:45:03 2007 +0000 +++ b/lisp/term/xterm.el Wed Jun 13 19:08:44 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-:])