mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-11-23 07:19:15 +00:00
Code Issues Releases Activity

Fix last change

Browse Source 
* lisp/mail/rmail.el (rmail-simplified-subject): A prefix can have
up to 4 characters, not 3.
This commit is contained in:
Eli Zaretskii 2020-04-13 12:25:37 +03:00
parent 49f2811f78
commit c395ebaf21
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
lisp/mail/rmail.el
View File

@ -3408,7 +3408,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,4\\}[:：]\\|\\[[^]]+]\\)[ \t\n]+\\)*"))
(setq subject (rfc2047-decode-string subject))
(setq subject (replace-regexp-in-string regexp "" subject))
(replace-regexp-in-string "[ \t\n]+" " " subject)))