Mercurial > emacs
changeset 58432:836d393b1c41
(gnus-summary-exit): Remove redundant and harmful
pop-to-buffer, covered by the subsequent gnus-configure-windows.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Mon, 22 Nov 2004 20:24:59 +0000 |
| parents | da65edef151e |
| children | b34b9f928699 |
| files | lisp/gnus/gnus-sum.el |
| diffstat | 1 files changed, 7 insertions(+), 10 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/gnus-sum.el Mon Nov 22 20:08:26 2004 +0000 +++ b/lisp/gnus/gnus-sum.el Mon Nov 22 20:24:59 2004 +0000 @@ -6676,15 +6676,12 @@ (when (eq mode 'gnus-summary-mode) (gnus-kill-buffer buf))) (setq gnus-current-select-method gnus-select-method) - (if leave-hidden - (set-buffer gnus-group-buffer) - (pop-to-buffer gnus-group-buffer)) - (if (not quit-config) - (progn - (goto-char group-point) - (unless leave-hidden - (gnus-configure-windows 'group 'force))) - (gnus-handle-ephemeral-exit quit-config)) + (set-buffer gnus-group-buffer) + (if quit-config + (gnus-handle-ephemeral-exit quit-config) + (goto-char group-point) + (unless leave-hidden + (gnus-configure-windows 'group 'force))) ;; Clear the current group name. (unless quit-config (setq gnus-newsgroup-name nil))))) @@ -11769,5 +11766,5 @@ ;; coding: iso-8859-1 ;; End: -;;; arch-tag: 17c6748f-6d00-4d36-bf01-835c42f31235 +;; arch-tag: 17c6748f-6d00-4d36-bf01-835c42f31235 ;;; gnus-sum.el ends here