diff lisp/gnus/gnus-topic.el @ 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 74bad2d7bddd
children 417b1e4d63cd
line wrap: on
line diff
--- 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)))