aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorFrancesco Potortì2018-01-26 16:11:33 +0200
committerEli Zaretskii2018-01-26 16:11:33 +0200
commit606c94f47ddef5a5a3dcff13048369253bbdcb3c (patch)
treee19236082c5308260a7021c4fe4983406aadc9ab
parent2b46ac7cee61b966fb7b07e297be4cb601e006e9 (diff)
downloademacs-606c94f47ddef5a5a3dcff13048369253bbdcb3c.tar.gz
emacs-606c94f47ddef5a5a3dcff13048369253bbdcb3c.zip
Fix a typo in rmail.el
* lisp/mail/rmail.el (rmail-simplified-subject): Fix a typo in the regexp. (Bug#29659)
-rw-r--r--lisp/mail/rmail.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el
index 4e182525511..4e5873c06ee 100644
--- a/lisp/mail/rmail.el
+++ b/lisp/mail/rmail.el
@@ -3403,7 +3403,7 @@ whitespace, replacing whitespace runs with a single space and
3403removing prefixes such as Re:, Fwd: and so on and mailing list 3403removing prefixes such as Re:, Fwd: and so on and mailing list
3404tags such as [tag]." 3404tags such as [tag]."
3405 (let ((subject (or (rmail-get-header "Subject" msgnum) "")) 3405 (let ((subject (or (rmail-get-header "Subject" msgnum) ""))
3406 (regexp "\`[ \t\n]*\\(\\(\\w\\{1,3\\}:\\|\\[[^]]+]\\)[ \t\n]+\\)*")) 3406 (regexp "\\`[ \t\n]*\\(\\(\\w\\{1,3\\}:\\|\\[[^]]+]\\)[ \t\n]+\\)*"))
3407 (setq subject (rfc2047-decode-string subject)) 3407 (setq subject (rfc2047-decode-string subject))
3408 (setq subject (replace-regexp-in-string regexp "" subject)) 3408 (setq subject (replace-regexp-in-string regexp "" subject))
3409 (replace-regexp-in-string "[ \t\n]+" " " subject))) 3409 (replace-regexp-in-string "[ \t\n]+" " " subject)))