Mercurial > hg > xemacs-beta
diff lisp/gnus/gnus-topic.el @ 32:e04119814345 r19-15b99
Import from CVS: tag r19-15b99
author | cvs |
---|---|
date | Mon, 13 Aug 2007 08:52:56 +0200 |
parents | ec9a17fef872 |
children | 131b0175ea99 |
line wrap: on
line diff
--- a/lisp/gnus/gnus-topic.el Mon Aug 13 08:52:30 2007 +0200 +++ b/lisp/gnus/gnus-topic.el Mon Aug 13 08:52:56 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))))