Mercurial > hg > xemacs-beta

diff lisp/gnus/gnus-topic.el @ 110:fe104dbd9147 r20-1b7

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b7
author cvs
date Mon, 13 Aug 2007 09:19:45 +0200
parents 360340f9fd5f
children 7d55a9ba150c
line wrap: on
line diff
--- a/lisp/gnus/gnus-topic.el	Mon Aug 13 09:18:41 2007 +0200
+++ b/lisp/gnus/gnus-topic.el	Mon Aug 13 09:19:45 2007 +0200
@@ -236,8 +236,8 @@
 	result found)
     (while (and topology
 		(not (setq found (equal (caaar topology) topic)))
-		(not (setq result (gnus-topic-parent-topic topic
-							   (car topology)))))
+		(not (setq result (gnus-topic-parent-topic
+				   topic (car topology)))))
       (setq topology (cdr topology)))
     (or result (and found parent))))