Mercurial > emacs
changeset 60257:4104a4e7e5c2
(gnus-summary-exit): Move point after displaying the
buffer, so it moves the window's cursor.
| author | Stefan Monnier <monnier@iro.umontreal.ca> |
|---|---|
| date | Sat, 26 Feb 2005 05:33:56 +0000 |
| parents | 62670df9ca97 |
| children | a94bedf417a1 |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-sum.el |
| diffstat | 2 files changed, 15 insertions(+), 9 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Sat Feb 26 05:28:24 2005 +0000 +++ b/lisp/gnus/ChangeLog Sat Feb 26 05:33:56 2005 +0000 @@ -1,13 +1,17 @@ +2005-02-26 Stefan Monnier <monnier@iro.umontreal.ca> + + * gnus-sum.el (gnus-summary-exit): Move point after displaying the + buffer, so it moves the window's cursor. + 2005-02-24 Reiner Steib <Reiner.Steib@gmx.de> - * nnheader.el (nnheader-find-file-noselect): Added doc string. + * nnheader.el (nnheader-find-file-noselect): Add doc string. * nnfolder.el (nnfolder-read-folder): Use RAWFILE for - `nnheader-find-file-noselect' to avoid - `large-file-warning-threshold'. + `nnheader-find-file-noselect' to avoid `large-file-warning-threshold'. - * gnus-sum.el (gnus-summary-caesar-message): Apply - `gnus-treat-article' after rotation. + * gnus-sum.el (gnus-summary-caesar-message): + Apply `gnus-treat-article' after rotation. * gnus-group.el (gnus-group-clear-data): Mention process/prefix in doc string. @@ -41,7 +45,7 @@ 2005-02-16 Teodor Zlatanov <tzz@lifelogs.com> - * gnus-registry.el (gnus-registry-delete-group): minor bug fix + * gnus-registry.el (gnus-registry-delete-group): Minor bug fix. * gnus.el (gnus-install-group-spam-parameters): Doc fix.
--- a/lisp/gnus/gnus-sum.el Sat Feb 26 05:28:24 2005 +0000 +++ b/lisp/gnus/gnus-sum.el Sat Feb 26 05:33:56 2005 +0000 @@ -1,5 +1,5 @@ ;;; gnus-sum.el --- summary mode commands for Gnus -;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004 +;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2001, 2002, 2003, 2004, 2005 ;; Free Software Foundation, Inc. ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> @@ -6680,9 +6680,11 @@ (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))) + (gnus-configure-windows 'group 'force)) + ;; Move point after calling gnus-configure-windows to make sure it + ;; moves the window's point as well. + (goto-char group-point)) ;; Clear the current group name. (unless quit-config (setq gnus-newsgroup-name nil)))))