From: Nikolaus Rath <Nikolaus@rath.org>
Date: Sun, 2 Aug 2015 22:28:21 +0000 (+0000)
Subject: nnimap.el: Explicitly ask for server capabilities
X-Git-Tag: emacs-25.0.90~1384
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=b0aa05907fe9ecd31601fcacb2aad5fd065e2595;p=emacs.git

nnimap.el: Explicitly ask for server capabilities

* lisp/gnus/nnimap.el (nnimap-open-connection-1): Don't assume full
capabilities will be returned in the login-result.
---

diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el
index 161a6b49ea7..594d1f57e7b 100644
--- a/lisp/gnus/nnimap.el
+++ b/lisp/gnus/nnimap.el
@@ -490,7 +490,7 @@ textual parts.")
 			(funcall (nth 2 credentials)))
 		      ;; See if CAPABILITY is set as part of login
 		      ;; response.
-		      (dolist (response (cddr login-result))
+		      (dolist (response (cddr (nnimap-command "CAPABILITY")))
 			(when (string= "CAPABILITY" (upcase (car response)))
 			  (setf (nnimap-capabilities nnimap-object)
 				(mapcar #'upcase (cdr response))))))