lisp/gnus/gnus-spec.el (gnus-parse-complex-format): Use unicode escape for left double angle quotation mark

2 files changed, 6 insertions, 1 deletions

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index def8ef0db14..80eaf708bc9 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
+2013-05-20  Adam Sjøgren  <asjo@koldfront.dk>
+
+        * gnus-spec.el (gnus-parse-complex-format): Use unicode escape for left
+        double angle quotation mark.
+
 2013-05-19  Adam Sjøgren  <asjo@koldfront.dk>
 
         * message.el (message-insert-formatted-citation-line): Handle finding
diff --git a/lisp/gnus/gnus-spec.el b/lisp/gnus/gnus-spec.el
index 2606b8860af..081bc876b03 100644
--- a/lisp/gnus/gnus-spec.el
+++ b/lisp/gnus/gnus-spec.el
@@ -441,7 +441,7 @@ characters when given a pad value."
               (delim (aref (match-string 2) 0)))
           (if (or (= delim ?\()
                   (= delim ?\{)
-                  (= delim ?\«))
+                  (= delim ?\u00AB)) ; «
               (replace-match (concat "\"("
                                      (cond ((= delim ?\() "mouse")
                                            ((= delim ?\{) "face")