Read the active files thoroughly for all backends that have no known

groups.

This should allow new nnml methods to retrieve mail, for instance.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2ec51ef..f9dbec8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2011-01-31  Lars Ingebrigtsen  <larsi@gnus.org>
 
+       * gnus-start.el (gnus-read-active-for-groups): Read the active files
+       thoroughly for all backends that have no known groups.  This should
+       allow new nnml methods to retrieve mail.
+
        * gnus-group.el (gnus-group-jump-to-group): Allow jumping to groups
        that Gnus doesn't know exists again.
 

diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el
index e2dff45..3879df3 100644 (file)
--- a/lisp/gnus-start.el
+++ b/lisp/gnus-start.el
@@ -1743,11 +1743,13 @@ If SCAN, request a scan of that group as well."
     (cond
      ((and
        (gnus-check-backend-function 'finish-retrieve-group-infos (car method))
+       infos
        (or (not (gnus-agent-method-p method))
           (gnus-online method)))
       (gnus-finish-retrieve-group-infos method infos early-data)
       (gnus-agent-save-active method))
-     ((gnus-check-backend-function 'retrieve-groups (car method))
+     ((and (gnus-check-backend-function 'retrieve-groups (car method))
+          infos)
       (when (gnus-check-backend-function 'request-scan (car method))
        (gnus-request-scan nil method))
       (let (groups)