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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9efb9fd..499da76 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/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-spec.el b/lisp/gnus-spec.el
index 2606b88..081bc87 100644 (file)
--- a/lisp/gnus-spec.el
+++ b/lisp/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")