diff options
| -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.") | |||
| 490 | (funcall (nth 2 credentials))) | 490 | (funcall (nth 2 credentials))) |
| 491 | ;; See if CAPABILITY is set as part of login | 491 | ;; See if CAPABILITY is set as part of login |
| 492 | ;; response. | 492 | ;; response. |
| 493 | (dolist (response (cddr login-result)) | 493 | (dolist (response (cddr (nnimap-command "CAPABILITY"))) |
| 494 | (when (string= "CAPABILITY" (upcase (car response))) | 494 | (when (string= "CAPABILITY" (upcase (car response))) |
| 495 | (setf (nnimap-capabilities nnimap-object) | 495 | (setf (nnimap-capabilities nnimap-object) |
| 496 | (mapcar #'upcase (cdr response)))))) | 496 | (mapcar #'upcase (cdr response)))))) |