From: teranisi <teranisi>
Date: Wed, 6 Jun 2001 03:16:56 +0000 (+0000)
Subject: Fixed last change.
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=42532797b14ac978a3b36268b9f07ffb7bfbdbbd;p=elisp%2Fwanderlust.git

Fixed last change.
---

diff --git a/elmo/elmo-pop3.el b/elmo/elmo-pop3.el
index 9e9335b..0a2e6cb 100644
--- a/elmo/elmo-pop3.el
+++ b/elmo/elmo-pop3.el
@@ -850,6 +850,7 @@ set as non-nil.")
 	(elmo-pop3-send-command process
 				(format "retr %s" number))
 	(setq elmo-pop3-total-size size)
+	(message "Retrieving...")
 	(unwind-protect
 	    (progn
 	      (when (null (setq response (elmo-pop3-read-response
@@ -857,6 +858,7 @@ set as non-nil.")
 		(error "Fetching message failed"))
 	      (setq response (elmo-pop3-read-body process outbuf)))
 	  (setq elmo-pop3-total-size nil))
+	(message "Retrieving...done.")
 	(set-buffer outbuf)
 	(goto-char (point-min))
 	(while (re-search-forward "^\\." nil t)