aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLars Ingebrigtsen2012-02-06 22:44:51 +0100
committerLars Ingebrigtsen2012-02-06 22:44:51 +0100
commit155628057e1fc9dee052303df2ab7ff1ee5f08a8 (patch)
treee7364b5b47226b61fb86a42bbcb60c2279171d02
parent7dd679eb09f65d0a83e14168b005ffc8270e7d05 (diff)
downloademacs-155628057e1fc9dee052303df2ab7ff1ee5f08a8.tar.gz
emacs-155628057e1fc9dee052303df2ab7ff1ee5f08a8.zip
Minor Gnus group exit fix
* gnus-sum.el (gnus-handle-ephemeral-exit): Allow exiting from Gnus when just reading a single group from "without" Gnus.
-rw-r--r--lisp/gnus/ChangeLog5
-rw-r--r--lisp/gnus/gnus-sum.el2
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 493734dc7bf..1d0e36d6479 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,3 +1,8 @@
12012-02-06 Lars Ingebrigtsen <larsi@gnus.org>
2
3 * gnus-sum.el (gnus-handle-ephemeral-exit): Allow exiting from Gnus
4 when just reading a single group from "without" Gnus.
5
12012-02-06 Chong Yidong <cyd@gnu.org> 62012-02-06 Chong Yidong <cyd@gnu.org>
2 7
3 * gnus-sum.el (gnus-summary-show-thread): 8 * gnus-sum.el (gnus-summary-show-thread):
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el
index 7b234a3df22..c7f80ec1512 100644
--- a/lisp/gnus/gnus-sum.el
+++ b/lisp/gnus/gnus-sum.el
@@ -7352,7 +7352,7 @@ If FORCE (the prefix), also save the .newsrc file(s)."
7352(defun gnus-handle-ephemeral-exit (quit-config) 7352(defun gnus-handle-ephemeral-exit (quit-config)
7353 "Handle movement when leaving an ephemeral group. 7353 "Handle movement when leaving an ephemeral group.
7354The state which existed when entering the ephemeral is reset." 7354The state which existed when entering the ephemeral is reset."
7355 (if (not (buffer-name (car quit-config))) 7355 (if (not (buffer-live-p (car quit-config)))
7356 (gnus-configure-windows 'group 'force) 7356 (gnus-configure-windows 'group 'force)
7357 (set-buffer (car quit-config)) 7357 (set-buffer (car quit-config))
7358 (unless (eq (cdr quit-config) 'group) 7358 (unless (eq (cdr quit-config) 'group)