# HG changeset patch
# User Dan Nicolaescu <dann@ics.uci.edu>
# Date 1181760489 0
# Node ID bf9ea781e3e0de9ab2b80c3b3de9a173a73e5718
# Parent  db32b7ba9c76586d11bf1ae8b11a216d177f14a2
 * term/xterm.el (terminal-init-xterm): Escape parens in character
  constants.

diff -r db32b7ba9c76 -r bf9ea781e3e0 lisp/ChangeLog
--- 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.
diff -r db32b7ba9c76 -r bf9ea781e3e0 lisp/term/xterm.el
--- 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-:])