(nnimap-get-groups): Allow non-quoted strings as mailbox names.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6e4ccb2..bffa62c 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2010-11-26  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * nnimap.el (nnimap-get-groups): Allow non-quoted strings as mailbox
+       names.
+
 2010-11-26  Katsumi Yamaoka  <yamaoka@jpl.org>
 
        * shr.el (shr-insert): Revert last change.

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 2f969da..cb4c9f0 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -1028,7 +1028,10 @@ textual parts.")
            (separator (read (current-buffer)))
            (group (read (current-buffer))))
        (unless (member '%NoSelect flags)
-         (push group groups))))
+         (push (if (stringp group)
+                   group
+                 (format "%s" group))
+               groups))))
     (nreverse groups)))
 
 (deffoo nnimap-request-list (&optional server)