diff lisp/gnus/message.el @ 108343:97594bf4e5a9

Synch with Gnus trunk: ;; I've committed this change to only the trunk by mistake, sorry, ;; but it should have been also in the branch.) (message-generate-headers): Record insertion of optional headers as well. Otherwise the check to prevent repeated insertion of optional headers is a no-op. By Andreas Seltenreich <seltenreich@gmx.de>.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Thu, 22 Apr 2010 23:41:53 +0000
parents 94ab0ee8d0c8
children a4f29934ad86
line wrap: on
line diff
--- a/lisp/gnus/message.el	Thu Apr 22 07:53:53 2010 +0000
+++ b/lisp/gnus/message.el	Thu Apr 22 23:41:53 2010 +0000
@@ -5880,6 +5880,7 @@
 		      (if formatter
 			  (funcall formatter header value)
 			(insert header-string ": " value))
+		      (push header-string message-inserted-headers)
 		      (goto-char (message-fill-field))
 		      ;; We check whether the value was ended by a
 		      ;; newline.  If not, we insert one.