From: Eric Abrahamsen <eric@ericabrahamsen.net>
Date: Fri, 10 May 2024 15:49:57 +0000 (-0700)
Subject: Remove extra message-set-auto-save-file-name call in Gnus drafts
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=38317d9007f9663f749a1b0377dac10448d59bb8;p=emacs.git

Remove extra message-set-auto-save-file-name call in Gnus drafts

Bug#70579

* lisp/gnus/gnus-draft.el (gnus-draft-setup): This function is already
being called as part of the message-mail -> message-mode call
above. Running it twice results in a jump in assigned article numbers,
and the corresponding active value of the drafts group.

(cherry picked from commit b1e94b7bd3b18fdae66d172c7c72398d6f0d5225)
---

diff --git a/lisp/gnus/gnus-draft.el b/lisp/gnus/gnus-draft.el
index 1fc2b33fffb..7c52e8750e4 100644
--- a/lisp/gnus/gnus-draft.el
+++ b/lisp/gnus/gnus-draft.el
@@ -262,8 +262,7 @@ If DONT-POP is nil, display the buffer after setting it up."
             (setq ga
                   (message-fetch-field gnus-draft-meta-information-header)))
           (insert mail-header-separator)
-          (forward-line 1)
-          (message-set-auto-save-file-name))))
+          (forward-line 1))))
     (gnus-backlog-remove-article group narticle)
     (when (and ga
                (ignore-errors (setq ga (car (read-from-string ga)))))