* lisp/international/characters.el (standard-case-table): Set syntax of ?»

and ?« to punctuation.

diff --git a/etc/NEWS b/etc/NEWS
index d2554f719f0d70608df69b25d5ef769c8c878800..d92c9cdec1be10197855219bd3942d4c371d3eae 100644 (file)
--- a/etc/NEWS
+++ b/etc/NEWS
@@ -415,6 +415,9 @@ It is layered as:
 \f
 * Incompatible Lisp Changes in Emacs 24.4
 
+** The syntax of ?» and ?« is now punctuation instead of matched parens.
+Some languages match those as »...« and others as «...» so better stay neutral.
+
 ** The default file coding for Emacs Lisp files is now utf-8.
 (See file-coding-system-alist.)  In most cases, this change is transparent, but
 files that contain unusual characters without specifying an explicit coding

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4f3cf82e7e07f0361f0ac22a1978e21dda25eeaf..5d44b897b51b932c6b6ccc856cbbbf870c742ac2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2013-06-17  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * international/characters.el (standard-case-table): Set syntax of ?»
+       and ?« to punctuation.
+
 2013-06-16  Juanma Barranquero  <lekktu@gmail.com>
 
        * progmodes/prog-mode.el (prog--prettify-font-lock-compose-symbol):

diff --git a/lisp/international/characters.el b/lisp/international/characters.el
index d973ccf2d7ed3e390af6b31a14cb8174b7d811c7..9f56b1c8b7da20b9bc3ac2119d288b0d97fe195b 100644 (file)
--- a/lisp/international/characters.el
+++ b/lisp/international/characters.el
@@ -512,7 +512,13 @@ with L, LRE, or LRO Unicode bidi character type.")
   (set-case-syntax ?¦ "_" tbl)
   (set-case-syntax ?§ "." tbl)
   (set-case-syntax ?© "_" tbl)
-  (set-case-syntax-delims 171 187 tbl) ; « »
+  ;; French wants
+  ;;   (set-case-syntax-delims ?« ?» tbl)
+  ;; And German wants
+  ;;   (set-case-syntax-delims ?» ?« tbl)
+  ;; So let's stay neutral and let users set these up if/when they want to.
+  (set-case-syntax ?« "." tbl)
+  (set-case-syntax ?» "." tbl)
   (set-case-syntax ?¬ "_" tbl)
   (set-case-syntax ?­ "_" tbl)
   (set-case-syntax ?® "_" tbl)