From: Mike Kupfer <kupfer@rawbw.com>
Date: Sun, 31 Dec 2023 17:11:23 +0000 (-0800)
Subject: Fix mangled Subject header field when forwarding (Bug#67360)
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=3204825f56040df0a783de4fc99052eabb62b84b;p=emacs.git

Fix mangled Subject header field when forwarding (Bug#67360)

* lisp/mh-e/mh-comp.el (mh-forward): Overwrite subject when
forwarding.
---

diff --git a/lisp/mh-e/mh-comp.el b/lisp/mh-e/mh-comp.el
index 92d31bf1826..0d1dcdf626a 100644
--- a/lisp/mh-e/mh-comp.el
+++ b/lisp/mh-e/mh-comp.el
@@ -574,7 +574,7 @@ See also `mh-compose-forward-as-mime-flag',
         (setq orig-subject (mh-get-header-field "Subject:")))
       (let ((forw-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))
         ;; Set the local value of mh-mail-header-separator according to what is
         ;; present in the buffer...