diff options
| author | Francesco Potortì <pot@gnu.org> | 2018-01-26 16:11:33 +0200 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2018-01-26 16:11:33 +0200 |
| commit | 606c94f47ddef5a5a3dcff13048369253bbdcb3c (patch) | |
| tree | e19236082c5308260a7021c4fe4983406aadc9ab | |
| parent | 2b46ac7cee61b966fb7b07e297be4cb601e006e9 (diff) | |
| download | emacs-606c94f47ddef5a5a3dcff13048369253bbdcb3c.tar.gz | |
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.el | 2 |
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 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))) |