summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorTomas Volf <~@wolfsden.cz>2024-12-03 15:40:53 +0100
committerRobert Pluim <rpluim@gmail.com>2024-12-03 15:48:25 +0100
commit0033ce9ef8eff2c8dfef644f2f110bc0edfa22aa (patch)
tree46990e25ff77ef308c96f8d39bc90e279b3a6eb9
parentfef05ba8f409738625167991e811c2ab50f5b047 (diff)
Actually remove the Mail-Followup-To header iff empty
* lisp/gnus/message.el (message-send-mail): Pass a fixed string instead of regexp to 'message-remove-header' (Bug#74658). Copyright-paperwork-exempt: yes
-rw-r--r--lisp/gnus/message.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el
index b49e3f9d9ca..b4c5a1e2436 100644
--- a/lisp/gnus/message.el
+++ b/lisp/gnus/message.el
@@ -4900,7 +4900,7 @@ If you always want Gnus to send messages in one piece, set
message-required-mail-headers))
;; otherwise, delete the MFT header if the field is empty
(when (equal "" (mail-fetch-field "mail-followup-to"))
- (message-remove-header "^Mail-Followup-To:")))
+ (message-remove-header "Mail-Followup-To")))
;; Insert some headers.
(let ((message-deletable-headers
(if news nil message-deletable-headers)))