From 0f10dc646b349f390d9b64ace1df7f3b1ea1e567 Mon Sep 17 00:00:00 2001 From: dmaus Date: Sun, 29 May 2011 16:05:56 +0000 Subject: [PATCH] * elmo-imap4.el (elmo-network-authenticate-session): Always ask for capabilities after login. (elmo-imap4-parse-response): Remove superfluous third argument to split-string. --- elmo/ChangeLog | 7 +++++++ elmo/elmo-imap4.el | 14 +++++++------- 2 files changed, 14 insertions(+), 7 deletions(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 795edd4..3aea9d3 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,10 @@ +2011-05-29 David Maus + + * elmo-imap4.el (elmo-network-authenticate-session): Always ask + for capabilities after login. + (elmo-imap4-parse-response): Remove superfluous third argument to + split-string. + 2011-01-12 David Maus * elmo-nntp.el (elmo-nntp-folder-msgdb-create): Remove accidental diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el index fa379be..788f28e 100644 --- a/elmo/elmo-imap4.el +++ b/elmo/elmo-imap4.el @@ -1154,15 +1154,15 @@ If CHOP-LENGTH is not specified, message set is not chopped." (if (sasl-step-data step) (elmo-base64-encode-string (sasl-step-data step) 'no-line-break) - ""))))))) + "")))))))) ;; Some servers return reduced capabilities when client asks for them ;; before login. It might be a good idea to ask them again, otherwise ;; we can miss some useful feature. - (elmo-imap4-session-set-capability-internal - session - (elmo-imap4-response-value - (elmo-imap4-send-command-wait session "capability") - 'capability))))))) + (elmo-imap4-session-set-capability-internal + session + (elmo-imap4-response-value + (elmo-imap4-send-command-wait session "capability") + 'capability)))))) (luna-define-method elmo-network-setup-session ((session elmo-imap4-session)) @@ -1455,7 +1455,7 @@ Return nil if no complete line has arrived." ")")))) (ESEARCH (list 'esearch - (cddr (split-string (buffer-substring (point) (point-max)) " " "\,")))) + (cddr (split-string (buffer-substring (point) (point-max)) " ")))) (STATUS (elmo-imap4-parse-status)) ;; Added (NAMESPACE (elmo-imap4-parse-namespace)) -- 1.7.10.4