From: teranisi <teranisi>
Date: Wed, 18 Sep 2002 07:33:56 +0000 (+0000)
Subject: * elmo-imap4.el (elmo-imap4-parse-status): Skip white spaces after status
X-Git-Tag: wl-2_11_1~126
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=4540910d665f92a624c73ba3a4bfc1cdc019e350;p=elisp%2Fwanderlust.git

* elmo-imap4.el (elmo-imap4-parse-status): Skip white spaces after status
 number.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 2c82aff..d0c8372 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2002-09-18  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* elmo-imap4.el (elmo-imap4-parse-status): Skip white spaces after
+	status number.
+
 2002-09-12  Yoichi NAKAYAMA  <yoichi@eken.phys.nagoya-u.ac.jp>
 
 	* elmo-dop.el (elmo-dop-queue-flush): Remove unused argument.
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index edd2702..2b68689 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -1545,7 +1545,8 @@ Return nil if no complete line has arrived."
 			(message
 			 "Unknown status data %s in mailbox %s ignored"
 			 token mailbox))))
-	       status))))
+	       status))
+	(skip-chars-forward " ")))
     (and elmo-imap4-status-callback
 	 (funcall elmo-imap4-status-callback
 		  status