(gnus-agent-covered-methods): Remove nil methods.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9cb78a9..7d8f233 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-11-30  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-agent.el (gnus-agent-covered-methods): Remove nil methods. 
+
 2003-11-29  Kevin Greiner <kgreiner@xpediantsolutions.com>
        * gnus-start.el (gnus-activate-group): The active range of the
        group must include the articles known to the agent.

diff --git a/lisp/gnus-agent.el b/lisp/gnus-agent.el
index a93eae4..240e840 100644 (file)
--- a/lisp/gnus-agent.el
+++ b/lisp/gnus-agent.el
@@ -1210,7 +1210,7 @@ This can be added to `gnus-select-article-hook' or
 
 (defun gnus-agent-covered-methods ()
   "Return the subset of methods that are covered by the agent."
-  (mapcar #'gnus-server-to-method gnus-agent-covered-methods))
+  (delq nil (mapcar #'gnus-server-to-method gnus-agent-covered-methods)))
 
 ;;; History functions