(nnimap-open-connection): Check for "OK" from the greeting.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f05a92f..e3ddf75 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-11-27  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * nnimap.el (nnimap-open-connection): Check for "OK" from the greeting.
+
 2010-11-27  Andrew Cohen  <cohen@andy.bu.edu>
 
        * nnir.el: Fix typos.

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 0041fe4..97a0fb4 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -344,7 +344,7 @@ textual parts.")
            (nnheader-report 'nnimap "Unable to contact %s:%s via %s"
                             nnimap-address port nnimap-stream)
          (gnus-set-process-query-on-exit-flag stream nil)
-         (if (not (string-match "[*.] \\([A-Z0-9]+\\)" greeting))
+         (if (not (string-match "[*.] OK" greeting))
              (nnheader-report 'nnimap "%s" greeting)
            ;; Store the greeting (for debugging purposes).
            (setf (nnimap-greeting nnimap-object) greeting)