From: Eli Zaretskii Date: Wed, 4 Jan 2012 18:51:47 +0000 (+0200) Subject: Rmail: support citations with non-ASCII letters in names X-Git-Tag: emacs-pretest-24.0.93~97^2~55^2~47 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=a7183d7c4625f88a8754061b02674d718e64f48f;p=emacs.git Rmail: support citations with non-ASCII letters in names lisp/mail/rmail.el (rmail-font-lock-keywords): Accept non-ASCII letters in cite-prefix. --- diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c852bc00c74..1125097feb7 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-01-04 Eli Zaretskii + + * mail/rmail.el (rmail-font-lock-keywords): Accept non-ASCII + letters in cite-prefix. + 2012-01-03 Lars Magne Ingebrigtsen * mail/smtpmail.el (smtpmail-stream-type): Mention the `ssl' value. diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index 2c94cfdf212..5f0eb2644ee 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -791,7 +791,7 @@ that knows the exact ordering of the \\( \\) subexpressions.") ;; These are all matched case-insensitively. (eval-when-compile (let* ((cite-chars "[>|}]") - (cite-prefix "a-z") + (cite-prefix "[:alpha:]") (cite-suffix (concat cite-prefix "0-9_.@-`'\""))) (list '("^\\(From\\|Sender\\|Resent-From\\):" . 'rmail-header-name)