Mercurial > emacs
changeset 110916:65a8bf3768b2
gnus-topic.el (gnus-topic-read-group): If after the last group, select the last group.
| author | Katsumi Yamaoka <yamaoka@jpl.org> |
|---|---|
| date | Mon, 11 Oct 2010 11:02:17 +0000 |
| parents | d0d0047ca0fb |
| children | 3243e7055d49 |
| files | lisp/gnus/ChangeLog lisp/gnus/gnus-topic.el |
| diffstat | 2 files changed, 7 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog Mon Oct 11 10:03:07 2010 +0000 +++ b/lisp/gnus/ChangeLog Mon Oct 11 11:02:17 2010 +0000 @@ -1,3 +1,8 @@ +2010-10-11 Lars Magne Ingebrigtsen <larsi@gnus.org> + + * gnus-topic.el (gnus-topic-read-group): If after the last group, + select the last group. + 2010-10-11 Teodor Zlatanov <tzz@lifelogs.com> * gnus-int.el (gnus-run-hook-with-args): Autoload from gnus-util.el.
--- a/lisp/gnus/gnus-topic.el Mon Oct 11 10:03:07 2010 +0000 +++ b/lisp/gnus/gnus-topic.el Mon Oct 11 11:02:17 2010 +0000 @@ -1255,6 +1255,8 @@ If performed over a topic line, toggle folding the topic." (interactive "P") + (when (and (eobp) (not (gnus-group-group-name))) + (forward-line -1)) (if (gnus-group-topic-p) (let ((gnus-group-list-mode (if all (cons (if (numberp all) all 7) t) gnus-group-list-mode)))