Mercurial > hg > xemacs-beta

comparison lisp/gnus/gnus-sum.el @ 106:8ff55ebd4be9 r20-1b5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-1b5
author cvs
date Mon, 13 Aug 2007 09:17:26 +0200
parents cf808b4c4290
children 360340f9fd5f
comparison
equal deleted inserted replaced
105:e59cf502fb45 106:8ff55ebd4be9
2072 (memq article gnus-newsgroup-unselected) 2072 (memq article gnus-newsgroup-unselected)
2073 (memq article gnus-newsgroup-dormant)))) 2073 (memq article gnus-newsgroup-dormant))))
2074 2074
2075 ;; Some summary mode macros. 2075 ;; Some summary mode macros.
2076 2076
2077 (defun gnus-summary-article-number () 2077 (defmacro gnus-summary-article-number ()
2078 "The article number of the article on the current line. 2078 "The article number of the article on the current line.
2079 If there isn's an article number here, then we return the current 2079 If there isn's an article number here, then we return the current
2080 article number." 2080 article number."
2081 '(progn 2081 '(progn
2082 (gnus-summary-skip-intangible) 2082 (gnus-summary-skip-intangible)