Fix a typo in rmail.el

* lisp/mail/rmail.el (rmail-simplified-subject): Fix a typo in the
regexp.  (Bug#29659)
This commit is contained in:
Francesco Potortì 2018-01-26 16:11:33 +02:00 committed by Eli Zaretskii
parent 2b46ac7cee
commit 606c94f47d

View file

@ -3403,7 +3403,7 @@ whitespace, replacing whitespace runs with a single space and
removing prefixes such as Re:, Fwd: and so on and mailing list
tags such as [tag]."
(let ((subject (or (rmail-get-header "Subject" msgnum) ""))
(regexp "\`[ \t\n]*\\(\\(\\w\\{1,3\\}:\\|\\[[^]]+]\\)[ \t\n]+\\)*"))
(regexp "\\`[ \t\n]*\\(\\(\\w\\{1,3\\}:\\|\\[[^]]+]\\)[ \t\n]+\\)*"))
(setq subject (rfc2047-decode-string subject))
(setq subject (replace-regexp-in-string regexp "" subject))
(replace-regexp-in-string "[ \t\n]+" " " subject)))