(nnimap-request-newgroups): Use the pattern in

nnimap-list-pattern instead of "*".

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d4ac5eb..e3b6be9 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-07-12  Nevin Kapur  <kapur@mts.jhu.edu>
+
+       * nnimap.el (nnimap-request-newgroups): Use the pattern in
+       nnimap-list-pattern instead of "*".
+
 2003-07-10  Simon Josefsson  <jas@extundo.com>
 
        * mml-sec.el (mml-signencrypt-style-alist): Use "combined" by

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index e220e3b..d36f225 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1326,7 +1326,7 @@ function is generally only called when Gnus is shutting down."
       (nnimap-before-find-minmax-bugworkaround)
       (dolist (pattern (nnimap-pattern-to-list-arguments
                        nnimap-list-pattern))
-       (dolist (mbx (imap-mailbox-lsub "*" (car pattern) nil
+       (dolist (mbx (imap-mailbox-lsub (cdr pattern) (car pattern) nil
                                        nnimap-server-buffer))
          (or (catch 'found
                (dolist (mailbox (imap-mailbox-get 'list-flags mbx