aboutsummaryrefslogtreecommitdiffstats
path: root/lisp
diff options
context:
space:
mode:
authorGlenn Morris2015-04-27 17:18:39 -0400
committerGlenn Morris2015-04-27 17:18:39 -0400
commit579db5085ba2ad48160bf5243c2cd477dce4242e (patch)
treee2c2942f609c175ccf832763344db86c1ef7a5bd /lisp
parentf3b43fca47f797fa348f57de220035e6fcecc5c7 (diff)
downloademacs-579db5085ba2ad48160bf5243c2cd477dce4242e.tar.gz
emacs-579db5085ba2ad48160bf5243c2cd477dce4242e.zip
* lisp/mail/rmail.el (rmail-reply):
Decode subject before matching "Re:" prefix. (Bug#20396)
Diffstat (limited to 'lisp')
-rw-r--r--lisp/mail/rmail.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 7efcf695b24..43abc128c8a 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -3830,7 +3830,8 @@ use \\[mail-yank-original] to yank the original message into it."
3830;;; (setq cc resent-cc))) 3830;;; (setq cc resent-cc)))
3831 ;; Add `Re: ' to subject if not there already. 3831 ;; Add `Re: ' to subject if not there already.
3832 (and (stringp subject) 3832 (and (stringp subject)
3833 (setq subject 3833 (setq subject (rfc2047-decode-string subject)
3834 subject
3834 (concat rmail-reply-prefix 3835 (concat rmail-reply-prefix
3835 (if (let ((case-fold-search t)) 3836 (if (let ((case-fold-search t))
3836 (string-match rmail-reply-regexp subject)) 3837 (string-match rmail-reply-regexp subject))