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

message.el (message-setup-1): Handle message-generate-headers-first set to t.

Browse source
This commit is contained in:
Julien Danjou 2011-02-06 12:48:19 +00:00 • committed by Katsumi Yamaoka
parent 847c082469
commit 184469b7a0
2 changed files with 8 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -1,3 +1,8 @@
2011-02-06 Julien Danjou <julien@danjou.info>
* message.el (message-setup-1): Handle message-generate-headers-first
set to t.
2011-02-04 Lars Ingebrigtsen <larsi@gnus.org>
* message.el (message-setup-1): Remove the read-only stuff, since it

4
lisp/gnus/message.el
View file

@ -6417,7 +6417,9 @@ are not included."
;; `References:' header if `message-generate-headers-first' was nil.
;; Therefore, always generate it first.
(let ((message-generate-headers-first
(append message-generate-headers-first '(References))))
(if (eq message-generate-headers-first t)
t
(append message-generate-headers-first '(References)))))
(when (message-news-p)
(when message-default-news-headers
(insert message-default-news-headers)