Mercurial > emacs

comparison lisp/gnus/gnus-sum.el @ 69647:e78140e0c24a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-174 Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 65-66) - Update from CVS
author Miles Bader <miles@gnu.org>
date Thu, 23 Mar 2006 23:11:47 +0000
parents 55d8c694b9cf
children a87e26272828 e6bf73e43cf4
comparison
equal deleted inserted replaced
69646:38f28026dd63 69647:e78140e0c24a
10617 (memq (mail-header-number header) gnus-newsgroup-unseen)) 10617 (memq (mail-header-number header) gnus-newsgroup-unseen))
10618 10618
10619 (defun gnus-map-articles (predicate articles) 10619 (defun gnus-map-articles (predicate articles)
10620 "Map PREDICATE over ARTICLES and return non-nil if any predicate is non-nil." 10620 "Map PREDICATE over ARTICLES and return non-nil if any predicate is non-nil."
10621 (apply 'gnus-or (mapcar predicate 10621 (apply 'gnus-or (mapcar predicate
10622 (mapcar 'gnus-summary-article-header articles)))) 10622 (mapcar (lambda (number)
10623 (gnus-summary-article-header number))
10624 articles))))
10623 10625
10624 (defun gnus-summary-hide-all-threads (&optional predicate) 10626 (defun gnus-summary-hide-all-threads (&optional predicate)
10625 "Hide all thread subtrees. 10627 "Hide all thread subtrees.
10626 If PREDICATE is supplied, threads that satisfy this predicate 10628 If PREDICATE is supplied, threads that satisfy this predicate
10627 will not be hidden." 10629 will not be hidden."