(gnus-map-articles): Don't funcall symbol macro. Reported by Ralf Wachinger.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bae1b4b..18bf852 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2006-03-22  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * gnus-sum.el (gnus-map-articles): Don't funcall symbol macro.
+       Reported by Ralf Wachinger <rwachinger@gmx.de>.
+
 2006-03-21  Simon Josefsson  <jas@extundo.com>
 
        * pgg-gpg.el: Ideas below based on patch from Sascha Wilde

diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el
index 296c832..f18209b 100644 (file)
--- a/lisp/gnus-sum.el
+++ b/lisp/gnus-sum.el
@@ -10907,8 +10907,10 @@ Returns nil if no thread was there to be shown."
 
 (defun gnus-map-articles (predicate articles)
   "Map PREDICATE over ARTICLES and return non-nil if any predicate is non-nil."
-  (apply 'gnus-or (mapcar predicate
-                         (mapcar 'gnus-summary-article-header articles))))
+  (apply 'gnus-or (mapcar predicaten
+                         (mapcar (lambda (number)
+                                   (gnus-summary-article-header number))
+                                 articles))))
 
 (defun gnus-summary-hide-all-threads (&optional predicate)
   "Hide all thread subtrees.