mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-15 10:30:25 -08:00
Code Issues Projects Releases Wiki Activity

gnus-topic.el (gnus-topic-read-group): If after the last group, select the last group.

Browse source
This commit is contained in:
Lars Magne Ingebrigtsen 2010-10-11 11:02:17 +00:00 • committed by Katsumi Yamaoka
parent 0be56f178c
commit 6ec07c5ad9
2 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

5
lisp/gnus/ChangeLog
View file

@ -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.

2
lisp/gnus/gnus-topic.el
View file

@ -1255,6 +1255,8 @@ that group.
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)))