lisp/gnus/nnimap.el (nnimap-request-group): Make it possible to enter nnimap groups...

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index e4818d44a1cc43ce5e30dccf88b0b186a44facab..64608d3bda05d111d9e1e6cdf3bbd81945981167 100644 (file)
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -2,6 +2,8 @@
 
        * nnimap.el (nnimap-request-group): Allow running this function on
        groups that don't exist in Gnus yet.
+       (nnimap-request-group): Revert previous patch since that made it
+       impossible to enter nnimap groups.
 
        * message.el (message-smtpmail-send-it): Remove the mail header
        separator before sending.

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 0fe2bb5872c6c3cf54f69029caf13084ecb9125e..e619c0f13c29dd16863ea70c291599fb0d6732f8 100644 (file)
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -804,10 +804,9 @@ textual parts.")
        articles active marks high low)
     (with-current-buffer nntp-server-buffer
       (when result
-       (when (and info
-                  (or (not dont-check)
-                      (not (setq active
-                                 (nth 2 (assoc group nnimap-current-infos))))))
+       (when (or (not dont-check)
+                 (not (setq active
+                            (nth 2 (assoc group nnimap-current-infos)))))
          (let ((sequences (nnimap-retrieve-group-data-early
                            server (list info))))
            (nnimap-finish-retrieve-group-infos server (list info) sequences