(gnus-draft-send): Bind gnus-message-setup-hook to nil when sending a queued

[gnus] / lisp / gnus-draft.el

diff --git a/lisp/gnus-draft.el b/lisp/gnus-draft.el
index 9e051a9..0c94d0b 100644 (file)
--- a/lisp/gnus-draft.el
+++ b/lisp/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)