]> git.eshelyaron.com Git - emacs.git/commitdiff
Run gnus-summary-prepare-exit-hook after flags have been updated
authorNikolaus Rath <Nikolaus@rath.org>
Fri, 27 Sep 2019 16:03:10 +0000 (18:03 +0200)
committerLars Ingebrigtsen <larsi@gnus.org>
Fri, 27 Sep 2019 16:03:10 +0000 (18:03 +0200)
* lisp/gnus/gnus-sum.el (gnus-summary-exit): Gnus message flags
must be set before expiration, not afterwards (bug#21071).

lisp/gnus/gnus-sum.el

index f83977ac5b813f30b3962c766b91a59a3632c376..20f338eda16e68c7daf5155d2f37a0c78bf79640 100644 (file)
@@ -7290,7 +7290,6 @@ If FORCE (the prefix), also save the .newsrc file(s)."
        (gnus-score-adaptive))
       (when gnus-use-scoring
        (gnus-score-save)))
-    (gnus-run-hooks 'gnus-summary-prepare-exit-hook)
     (when gnus-use-cache
       (gnus-cache-possibly-remove-articles)
       (gnus-cache-save-buffers))
@@ -7307,6 +7306,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
     (unless quit-config
       (gnus-run-hooks 'gnus-exit-group-hook)
       (gnus-summary-update-info))
+    (gnus-run-hooks 'gnus-summary-prepare-exit-hook)
     (gnus-close-group group)
     ;; Make sure where we were, and go to next newsgroup.
     (when (gnus-buffer-live-p gnus-group-buffer)