Mercurial > emacs
diff lisp/gnus/gnus-agent.el @ 79022:65ad63ddd4f6
Merge from gnus--rel--5.10
Revision: emacs@sv.gnu.org/emacs--rel--22--patch-115
author | Miles Bader <miles@gnu.org> |
---|---|
date | Tue, 09 Oct 2007 08:55:58 +0000 |
parents | 2d4fbb82deec |
children | 1cb31606209f a3c27999decb bdb3fe0ba9fa |
line wrap: on
line diff
--- a/lisp/gnus/gnus-agent.el Tue Oct 09 08:39:33 2007 +0000 +++ b/lisp/gnus/gnus-agent.el Tue Oct 09 08:55:58 2007 +0000 @@ -1765,12 +1765,13 @@ (gnus-agent-find-parameter group 'agent-predicate))))) (articles (if fetch-all - (if gnus-maximum-newsgroup + (if gnus-newsgroup-maximum-articles (let ((active (gnus-active group))) (gnus-uncompress-range (cons (max (car active) (- (cdr active) - gnus-maximum-newsgroup -1)) + gnus-newsgroup-maximum-articles + -1)) (cdr active)))) (gnus-uncompress-range (gnus-active group))) (gnus-list-of-unread-articles group)))