diff options
Diffstat (limited to 'lisp/gnus/nnagent.el')
| -rw-r--r-- | lisp/gnus/nnagent.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/nnagent.el b/lisp/gnus/nnagent.el index f2acea4fa64..1f21eee8680 100644 --- a/lisp/gnus/nnagent.el +++ b/lisp/gnus/nnagent.el @@ -138,13 +138,13 @@ group action server))) nil) -(deffoo nnagent-retrieve-headers (articles &optional group server fetch-old) +(deffoo nnagent-retrieve-headers (articles &optional group _server fetch-old) (let ((file (gnus-agent-article-name ".overview" group)) arts n first) (save-excursion (gnus-agent-load-alist group) (setq arts (gnus-sorted-difference - articles (mapcar 'car gnus-agent-article-alist))) + articles (mapcar #'car gnus-agent-article-alist))) ;; Assume that articles with smaller numbers than the first one ;; Agent knows are gone. (setq first (caar gnus-agent-article-alist)) |