[gnus git] branch master updated: =1= message: handle message-generate-headers-first set to t
Julien Danjou <[email protected]>
| Newsgroups | gmane.emacs.gnus.cvs |
|---|---|
| Message-ID | <[email protected]> |
via 051c1fc03aadf16a08d4222dda114fd461563397 (commit)
from 559d890c6790f924fc523d29cf311c02d7c9f84f (commit)
- Log -----------------------------------------------------------------
commit 051c1fc03aadf16a08d4222dda114fd461563397
Author: Julien Danjou <[email protected]>
Date: Sun Feb 6 10:32:44 2011 +0100
message: handle message-generate-headers-first set to t
Signed-off-by: Julien Danjou <[email protected]>
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 15019d3..600b442 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-02-06 Julien Danjou <[email protected]>
+
+ * message.el (message-setup-1): Handle message-generate-headers-first
+ set to t.
+
2011-02-04 Lars Ingebrigtsen <[email protected]>
* message.el (message-setup-1): Remove the read-only stuff, since it
diff --git a/lisp/message.el b/lisp/message.el
index b9e9c04..a1baf71 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6461,7 +6461,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)
-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.
Summary of changes:
lisp/ChangeLog | 5 +++++
lisp/message.el | 4 +++-
2 files changed, 8 insertions(+), 1 deletions(-)
This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".
The branch, master has been updated
hooks/post-receive
--
Gnus Project