diff options
| -rw-r--r-- | lisp/gnus/gnus-sum.el | 17 |
1 files changed, 7 insertions, 10 deletions
diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 5f2c2d7aeb1..4c5b8dcf9d5 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el | |||
| @@ -6676,15 +6676,12 @@ If FORCE (the prefix), also save the .newsrc file(s)." | |||
| 6676 | (when (eq mode 'gnus-summary-mode) | 6676 | (when (eq mode 'gnus-summary-mode) |
| 6677 | (gnus-kill-buffer buf))) | 6677 | (gnus-kill-buffer buf))) |
| 6678 | (setq gnus-current-select-method gnus-select-method) | 6678 | (setq gnus-current-select-method gnus-select-method) |
| 6679 | (if leave-hidden | 6679 | (set-buffer gnus-group-buffer) |
| 6680 | (set-buffer gnus-group-buffer) | 6680 | (if quit-config |
| 6681 | (pop-to-buffer gnus-group-buffer)) | 6681 | (gnus-handle-ephemeral-exit quit-config) |
| 6682 | (if (not quit-config) | 6682 | (goto-char group-point) |
| 6683 | (progn | 6683 | (unless leave-hidden |
| 6684 | (goto-char group-point) | 6684 | (gnus-configure-windows 'group 'force))) |
| 6685 | (unless leave-hidden | ||
| 6686 | (gnus-configure-windows 'group 'force))) | ||
| 6687 | (gnus-handle-ephemeral-exit quit-config)) | ||
| 6688 | ;; Clear the current group name. | 6685 | ;; Clear the current group name. |
| 6689 | (unless quit-config | 6686 | (unless quit-config |
| 6690 | (setq gnus-newsgroup-name nil))))) | 6687 | (setq gnus-newsgroup-name nil))))) |
| @@ -11769,5 +11766,5 @@ If ALL is a number, fetch this number of articles." | |||
| 11769 | ;; coding: iso-8859-1 | 11766 | ;; coding: iso-8859-1 |
| 11770 | ;; End: | 11767 | ;; End: |
| 11771 | 11768 | ||
| 11772 | ;;; arch-tag: 17c6748f-6d00-4d36-bf01-835c42f31235 | 11769 | ;; arch-tag: 17c6748f-6d00-4d36-bf01-835c42f31235 |
| 11773 | ;;; gnus-sum.el ends here | 11770 | ;;; gnus-sum.el ends here |