master cbd95b9: Ensure that we get an X-Draft-From headers

[Lars Ingebrigtsen]

branch: master
commit cbd95b9a415f814fcc3c36dfd7f52a2dd9679d8e
Author: Adam Sjøgren <asjo@koldfront.dk>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Ensure that we get an X-Draft-From headers
    
    * lisp/gnus/gnus-msg.el (gnus-setup-message): Ensure that we get an
    X-Draft-From headers (bug#48049).
---
 lisp/gnus/gnus-msg.el | 11 ++++++-----
 1 file changed, 6 insertions(+), 5 deletions(-)

diff --git a/lisp/gnus/gnus-msg.el b/lisp/gnus/gnus-msg.el
index f1181d4..bac987e 100644
--- a/lisp/gnus/gnus-msg.el
+++ b/lisp/gnus/gnus-msg.el
@@ -415,11 +415,12 @@ only affect the Gcc copy, but not the original message."
                             gnus-article-reply)))
           (,oarticle gnus-article-reply)
           (,yanked gnus-article-yanked-articles)
-          (,group (when gnus-article-reply
-                    (or (nnselect-article-group
-                         (or (car-safe gnus-article-reply)
-                             gnus-article-reply))
-                        gnus-newsgroup-name)))
+           (,group (if gnus-article-reply
+                      (or (nnselect-article-group
+                           (or (car-safe gnus-article-reply)
+                               gnus-article-reply))
+                           gnus-newsgroup-name)
+                     gnus-newsgroup-name))
           (message-header-setup-hook
            (copy-sequence message-header-setup-hook))
           (mbl mml-buffer-list)