From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Fri, 13 Apr 2018 19:33:37 +0000 (+0200)
Subject: Tweak point placement in *Group* on `Q' exit
X-Git-Tag: emacs-27.0.90~5238
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9f5f26c2b699f26937245905b3217b2fc6a4cf06;p=emacs.git

Tweak point placement in *Group* on `Q' exit

* lisp/gnus/gnus-sum.el (gnus-summary-exit-no-update): When
exiting the summary buffer with `Q', move point to the next unread
group (which is the same thing that happens on `q' exit.)
---

diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index b1e9d60e3b2..0a7b233a480 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -7353,7 +7353,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
       (setq gnus-newsgroup-name nil)
       (unless (gnus-ephemeral-group-p group)
 	(gnus-group-update-group group nil t))
-      (when (equal (gnus-group-group-name) group)
+      (when (gnus-group-goto-group group)
 	(gnus-group-next-unread-group 1))
       (gnus-article-stop-animations)
       (when quit-config