From f28b4a98c178b664ade7a6218db5b3ba61d81593 Mon Sep 17 00:00:00 2001 From: Lars Ingebrigtsen Date: Mon, 6 Feb 2012 23:20:52 +0100 Subject: [PATCH] Fix `Q' exit if gnus-kill-summary-on-exit is nil * gnus-sum.el (gnus-summary-exit-no-update): Really deaden the summary buffer if `gnus-kill-summary-on-exit' is nil. --- lisp/ChangeLog | 5 +++++ lisp/gnus-sum.el | 6 ++++-- 2 files changed, 9 insertions(+), 2 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index c48f08c40..1a5929d19 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2012-02-06 Lars Ingebrigtsen + + * gnus-sum.el (gnus-summary-exit-no-update): Really deaden the summary + buffer if `gnus-kill-summary-on-exit' is nil. + 2012-02-05 Lars Ingebrigtsen * nnimap.el (nnimap-open-server): Allow switching the nnoo server diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index d0a582e27..d4fdfeb69 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -7328,9 +7328,11 @@ If FORCE (the prefix), also save the .newsrc file(s)." (gnus-kill-buffer gnus-original-article-buffer) (setq gnus-article-current nil)) ;; Return to the group buffer. - (gnus-configure-windows 'group 'force) (if (not gnus-kill-summary-on-exit) - (gnus-deaden-summary) + (progn + (gnus-deaden-summary) + (gnus-configure-windows 'group 'force)) + (gnus-configure-windows 'group 'force) (gnus-close-group group) (gnus-kill-buffer gnus-summary-buffer)) (unless gnus-single-article-buffer -- 2.25.1