From: teranisi <teranisi>
Date: Thu, 5 Jul 2001 10:17:48 +0000 (+0000)
Subject: * elmo-imap4.el (elmo-imap4-find-next-line): Fixed label for
X-Git-Tag: wl-2_6_1~67
X-Git-Url: http://git.chise.org/gitweb/?p=elisp%2Fwanderlust.git;a=commitdiff_plain;h=80ab384a553a490563ed07787c147861b4f12aae

* elmo-imap4.el (elmo-imap4-find-next-line): Fixed label for
 elmo-display-progress.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 3230630..6a8b2e9 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2001-07-05  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* elmo-imap4.el (elmo-imap4-find-next-line): Fixed
+	label for elmo-display-progress.
+
 2001-07-04  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* 2.6.0 is released.
diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index 52e4996..707a263 100644
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -1602,7 +1602,7 @@ Return nil if no complete line has arrived."
 		       (> (string-to-number (match-string 1))
 			  (min elmo-display-retrieval-progress-threshold 100)))
 		  (elmo-display-progress
-		   'elmo-display-retrieval-progress
+		   'elmo-imap4-display-literal-progress
 		   (format "Retrieving (%d/%d bytes)..."
 			   (- (point-max) (point))
 			   (string-to-number (match-string 1)))