(nnimap-open-connection): Give an error if nnimap-stream is unknown.

[gnus] / lisp / nnimap.el

diff --git a/lisp/nnimap.el b/lisp/nnimap.el
index 0be841a..c3c25cb 100644 (file)
--- a/lisp/nnimap.el
+++ b/lisp/nnimap.el
@@ -324,7 +324,9 @@ textual parts.")
                           (if (netrc-find-service-number "imaps")
                               "imaps"
                             "993"))))
-               '("143" "993" "imap" "imaps"))))
+               '("143" "993" "imap" "imaps"))
+              (t
+               (error "Unknown stream type: %s" nnimap-stream))))
             connection-result login-result credentials)
        (setf (nnimap-process nnimap-object)
              (get-buffer-process (current-buffer)))