Fix mangled Subject header field when forwarding (Bug#67360)
* lisp/mh-e/mh-comp.el (mh-forward): Overwrite subject when forwarding.
This commit is contained in:
parent
7591acfe38
commit
3204825f56
1 changed files with 1 additions and 1 deletions
|
@ -574,7 +574,7 @@ See also `mh-compose-forward-as-mime-flag',
|
||||||
(setq orig-subject (mh-get-header-field "Subject:")))
|
(setq orig-subject (mh-get-header-field "Subject:")))
|
||||||
(let ((forw-subject
|
(let ((forw-subject
|
||||||
(mh-forwarded-letter-subject orig-from orig-subject)))
|
(mh-forwarded-letter-subject orig-from orig-subject)))
|
||||||
(mh-insert-fields "Subject:" forw-subject)
|
(mh-modify-header-field "Subject" forw-subject t)
|
||||||
(goto-char (point-min))
|
(goto-char (point-min))
|
||||||
;; Set the local value of mh-mail-header-separator according to what is
|
;; Set the local value of mh-mail-header-separator according to what is
|
||||||
;; present in the buffer...
|
;; present in the buffer...
|
||||||
|
|
Loading…
Add table
Reference in a new issue