From df6eabd626b3a4d8f31bed990dd4d94cf815ba77 Mon Sep 17 00:00:00 2001 From: teranisi Date: Wed, 6 Jun 2001 01:08:42 +0000 Subject: [PATCH] (elmo-pop3-process-filter): Show retrieve progress. --- elmo/ChangeLog | 4 ++++ elmo/elmo-pop3.el | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/elmo/ChangeLog b/elmo/ChangeLog index 51fefb8..e36c7b4 100644 --- a/elmo/ChangeLog +++ b/elmo/ChangeLog @@ -1,3 +1,7 @@ +2001-06-06 Yuuichi Teranishi + + * elmo-pop3.el (elmo-pop3-process-filter): Show retrieve progress. + 2001-03-27 Kenichi OKADA * elmo-imap4.el (elmo-imap4-list-folders): Fixed problem when diff --git a/elmo/elmo-pop3.el b/elmo/elmo-pop3.el index 7451f98..55a1f5d 100644 --- a/elmo/elmo-pop3.el +++ b/elmo/elmo-pop3.el @@ -137,7 +137,8 @@ (save-excursion (set-buffer (process-buffer process)) (goto-char (point-max)) - (insert output))) + (insert output) + (message "Retrieving...(%d bytes)." (buffer-size)))) (defun elmo-pop3-auth-user (session) (let ((process (elmo-network-session-process-internal session))) -- 1.7.10.4