(nnimap-request-newgroups): Return success.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index bddd86c..5c64eb8 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2010-10-05  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+       * nnimap.el (nnimap-request-newgroups): Return success.
+
        * shr.el (shr-find-elements): New function.
        (shr-tag-table): Put all the images after the table.
        (shr-tag-table): Really inhibit images inside the table.

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index c3c25cb..d56e2f4 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -926,7 +926,8 @@ textual parts.")
                     (nnimap-get-groups)))
       (unless (assoc group nnimap-current-infos)
        ;; Insert dummy numbers here -- they don't matter.
-       (insert (format "%S 0 1 y\n" group))))))
+       (insert (format "%S 0 1 y\n" group))))
+    t))
 
 (deffoo nnimap-retrieve-group-data-early (server infos)
   (when (nnimap-possibly-change-group nil server)