procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix Subject when forwarding message with 2-line From

Browse source 
* lisp/mh-e/mh-comp.el (mh-forwarded-letter-subject): Collapse
two-line From headers into a single line (SF#266).  Based on a
suggestion from Lester Buck (many thanks!).
This commit is contained in:
Mike Kupfer 2021-11-26 13:59:14 -08:00
parent b8b2dd17c5
commit 2a4de5e5e5
1 changed files with 2 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/mh-e/mh-comp.el
View file

@ -638,6 +638,8 @@ See also `mh-compose-forward-as-mime-flag',
(defun mh-forwarded-letter-subject (from subject)
"Return a Subject suitable for a forwarded message.
Original message has headers FROM and SUBJECT."
;; Join continued lines.
(setq from (replace-regexp-in-string "\\s *\n\\s +" " " from))
(let ((addr-start (string-search "<" from))
(comment (string-search "(" from)))
(cond ((and addr-start (> addr-start 0))