diff options
| author | Nikolaus Rath <Nikolaus@rath.org> | 2015-08-02 22:28:21 +0000 |
|---|---|---|
| committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2015-08-02 22:28:21 +0000 |
| commit | b0aa05907fe9ecd31601fcacb2aad5fd065e2595 (patch) | |
| tree | cea25a06b17900323d1924f00c45bbcbb7ecfab3 | |
| parent | 5f5fe275ec54194a9293690ffee3d425026ac14b (diff) | |
| download | emacs-b0aa05907fe9ecd31601fcacb2aad5fd065e2595.tar.gz | |
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.
| -rw-r--r-- | lisp/gnus/nnimap.el | 2 |
1 files changed, 1 insertions, 1 deletions
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)))))) |