From 2235f4ac6ded6bbcb5a183b96ee68cfdf0e5a091 Mon Sep 17 00:00:00 2001 From: Miles Bader Date: Tue, 3 Mar 2009 10:18:45 +0000 Subject: Merge from gnus--devo--0 Revision: emacs@sv.gnu.org/emacs--devo--0--patch-1564 --- lisp/gnus/ChangeLog | 5 +++++ lisp/gnus/gnus-draft.el | 2 ++ 2 files changed, 7 insertions(+) diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index b21bad407f..d0a9a7209f 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,3 +1,8 @@ +2009-03-03 Brian Sniffen (tiny change) + + * gnus-draft.el (gnus-draft-send): Bind gnus-message-setup-hook to nil + when sending a queued message to avoid extra mml tags. + 2009-03-02 Katsumi Yamaoka * mml.el (mml-insert-mime): Don't break parts that mm-uu dissected. diff --git a/lisp/gnus/gnus-draft.el b/lisp/gnus/gnus-draft.el index 9e051a960b..0c94d0be5e 100644 --- a/lisp/gnus/gnus-draft.el +++ b/lisp/gnus/gnus-draft.el @@ -146,6 +146,8 @@ Obeys the standard process/prefix convention." message-send-hook)) (message-setup-hook (and (not is-queue) message-setup-hook)) + (gnus-message-setup-hook (and (not is-queue) + gnus-message-setup-hook)) (message-signature (and (not is-queue) message-signature)) (gnus-agent-queue-mail (and (not is-queue) -- cgit v1.2.3