diff options
| author | Andreas Schwab | 2016-02-07 13:29:16 +0100 |
|---|---|---|
| committer | Andreas Schwab | 2016-02-07 13:30:43 +0100 |
| commit | 9dc77e37aa84c6df9b3ddb4609f3c09201b0580e (patch) | |
| tree | 629528715489fe8153e07d8b3c0f3eb7bcc43578 | |
| parent | d7933ff2acfb5666de08ad74146cd40d7bca7d08 (diff) | |
| download | emacs-9dc77e37aa84c6df9b3ddb4609f3c09201b0580e.tar.gz emacs-9dc77e37aa84c6df9b3ddb4609f3c09201b0580e.zip | |
Fix gnus-group-get-new-news-this-group on group with closed server
* lisp/gnus/nnimap.el (nnimap-change-group): Lookup server
method and pass to nnimap-open-server.
| -rw-r--r-- | lisp/gnus/nnimap.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/gnus/nnimap.el b/lisp/gnus/nnimap.el index c285befc760..130658cd367 100644 --- a/lisp/gnus/nnimap.el +++ b/lisp/gnus/nnimap.el | |||
| @@ -1831,7 +1831,9 @@ Return the server's response to the SELECT or EXAMINE command." | |||
| 1831 | (let ((open-result t)) | 1831 | (let ((open-result t)) |
| 1832 | (when (and server | 1832 | (when (and server |
| 1833 | (not (nnimap-server-opened server))) | 1833 | (not (nnimap-server-opened server))) |
| 1834 | (setq open-result (nnimap-open-server server nil no-reconnect))) | 1834 | (let ((method (gnus-server-to-method server))) |
| 1835 | (setq open-result (nnimap-open-server (nth 1 method) (nthcdr 2 method) | ||
| 1836 | no-reconnect)))) | ||
| 1835 | (cond | 1837 | (cond |
| 1836 | ((not open-result) | 1838 | ((not open-result) |
| 1837 | nil) | 1839 | nil) |