* elmo-imap4.el (elmo-imap4-send-command):

Cause elmo-imap4-bye-error when current response is BYE.
(elmo-imap4-arrival-filter): Changed greeting response value.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 0b4040b..ae89601 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,9 @@
 2000-08-31  Yuuichi Teranishi  <teranisi@gohome.org>
 
+       * elmo-imap4.el (elmo-imap4-send-command):
+       Cause elmo-imap4-bye-error when current response is BYE.
+       (elmo-imap4-arrival-filter): Changed greeting response value.
+
        * elmo2.el (elmo-imap4-bye-error): Define.
 
        * elmo-imap4.el (elmo-imap4-list): Don't call `elmo-imap4-commit'.

diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index df6dc40..9f9dfc0 100644 (file)
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -250,7 +250,8 @@ Returns a TAG string which is assigned to the COMAND."
       (goto-char (point-min))
       (if (elmo-imap4-response-bye-p elmo-imap4-current-response)
          (signal 'elmo-imap4-bye-error
-                 (list (elmo-imap4-response-error-text response))))      
+                 (list
+                  (elmo-imap4-response-error-text response))))
       (setq elmo-imap4-current-response nil)
       (if elmo-imap4-parsing
          (error "IMAP process is running. Please wait (or plug again.)"))