From: teranisi <teranisi>
Date: Sun, 12 Dec 2004 03:25:56 +0000 (+0000)
Subject: (elmo-network-initialize-session): Erase buffer after parsing greeting string.
X-Git-Tag: wl-2_12-root~9
X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=465a2478987776d81c82630c72342ee1e807464f;p=elisp%2Fwanderlust.git

(elmo-network-initialize-session): Erase buffer after parsing greeting string.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 885c4a0..dbe47ca 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2004-12-12  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* elmo-imap4.el (elmo-network-initialize-session): Erase buffer
+	after parsing greeting string.
+
 2004-11-23  Daishi Kato <daishi@axlight.com>
 
 	* elsp-spamoracle.el (elmo-spam-spamoracle-spam-header-regexp):
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 8146bd9..fbb0815 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -970,6 +970,7 @@ If CHOP-LENGTH is not specified, message set is not chopped."
 		  (forward-line -1)
 		  (not (elmo-imap4-parse-greeting)))
 	(accept-process-output process 1))
+      (erase-buffer)
       (set-process-filter process 'elmo-imap4-arrival-filter)
       (set-process-sentinel process 'elmo-imap4-sentinel)
 ;;;   (while (and (memq (process-status process) '(open run))