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

 elmo-display-progress.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 08004f3..6f65e11 100644 (file)
--- 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-02  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * elmo.el (elmo-folder-clear): New method.

diff --git a/elmo/elmo-imap4.el b/elmo/elmo-imap4.el
index e7dfdc2..4f9a27f 100644 (file)
--- a/elmo/elmo-imap4.el
+++ b/elmo/elmo-imap4.el
@@ -1146,7 +1146,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)))