[Emacs-diffs] master cfb1887: lisp/gnus/nnimap.el (nnimap-request-group): nnimap group activation problems fixed

[Katsumi Yamaoka]

branch: master
commit cfb188718998d2bfbbee17567c9527a20518547f
Author: Lars Magne Ingebrigtsen <address@hidden>
Commit: Katsumi Yamaoka <address@hidden>

    lisp/gnus/nnimap.el (nnimap-request-group): nnimap group activation 
problems fixed
---
 lisp/gnus/ChangeLog |    3 +++
 lisp/gnus/nnimap.el |    7 ++++---
 2 files changed, 7 insertions(+), 3 deletions(-)

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 3927f09..e4818d4 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -1,5 +1,8 @@
 2015-01-29  Lars Ingebrigtsen  <address@hidden>
 
+       * nnimap.el (nnimap-request-group): Allow running this function on
+       groups that don't exist in Gnus yet.
+
        * 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 e619c0f..0fe2bb5 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -804,9 +804,10 @@ textual parts.")
        articles active marks high low)
     (with-current-buffer nntp-server-buffer
       (when result
-       (when (or (not dont-check)
-                 (not (setq active
-                            (nth 2 (assoc group nnimap-current-infos)))))
+       (when (and info
+                  (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