[Emacs-diffs] /srv/bzr/emacs/trunk r106773: Rmail: support citations with non-ASCII letters in names

[Eli Zaretskii]

------------------------------------------------------------
revno: 106773
committer: Eli Zaretskii <address@hidden>
branch nick: trunk
timestamp: Wed 2012-01-04 20:51:47 +0200
message:
  Rmail: support citations with non-ASCII letters in names
  
   lisp/mail/rmail.el (rmail-font-lock-keywords): Accept non-ASCII
   letters in cite-prefix.
modified:
  lisp/ChangeLog
  lisp/mail/rmail.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-01-03 19:41:14 +0000
+++ b/lisp/ChangeLog    2012-01-04 18:51:47 +0000
@@ -1,3 +1,8 @@
+2012-01-04  Eli Zaretskii  <address@hidden>
+
+       * mail/rmail.el (rmail-font-lock-keywords): Accept non-ASCII
+       letters in cite-prefix.
+
 2012-01-03  Lars Magne Ingebrigtsen  <address@hidden>
 
        * mail/smtpmail.el (smtpmail-stream-type): Mention the `ssl' value.

=== modified file 'lisp/mail/rmail.el'
--- a/lisp/mail/rmail.el        2011-12-31 10:06:21 +0000
+++ b/lisp/mail/rmail.el        2012-01-04 18:51:47 +0000
@@ -791,7 +791,7 @@
   ;; These are all matched case-insensitively.
   (eval-when-compile
     (let* ((cite-chars "[>|}]")
-          (cite-prefix "a-z")
+          (cite-prefix "[:alpha:]")
           (cite-suffix (concat cite-prefix "address@hidden'\"")))
       (list '("^\\(From\\|Sender\\|Resent-From\\):"
              . 'rmail-header-name)