From: teranisi <teranisi>
Date: Fri, 28 Apr 2000 07:28:59 +0000 (+0000)
Subject: (wl-folder-insert-entity): Remove progress gauge only when it was displayed.
X-Git-Tag: wl-1_1_1~21
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=e5f8b91b2a3aa387d2f06c19cf665e4b6f33b15f;p=elisp%2Fwanderlust.git

(wl-folder-insert-entity): Remove progress gauge only when it was displayed.
---

diff --git a/wl/wl-folder.el b/wl/wl-folder.el
index ec7ccae..a43755c 100644
--- a/wl/wl-folder.el
+++ b/wl/wl-folder.el
@@ -4,7 +4,7 @@
 
 ;; Author: Yuuichi Teranishi <teranisi@gohome.org>
 ;; Keywords: mail, net news
-;; Time-stamp: <00/04/28 11:53:33 teranisi>
+;; Time-stamp: <00/04/28 14:26:38 teranisi>
 
 ;; This file is part of Wanderlust (Yet Another Message Interface on Emacsen).
 
@@ -1654,11 +1654,11 @@ Entering Folder mode calls the value of `wl-folder-mode-hook'."
 		    (elmo-display-progress
 		     'wl-folder-insert-entity "Inserting group %s..."
 		     (/ (* i 100) len) (car entity)))
-		  ;(elmo-display-progress
-		  ; 'wl-folder-insert-entity "Inserting group %s..."
-		  ; 100 (car entity))
 		  (setq flist (cdr flist)))
-		(when mes (message "")))
+		(when mes 
+		  (elmo-display-progress
+		   'wl-folder-insert-entity "Inserting group %s..."
+		   100 (car entity))))
 	      (save-excursion
 		(goto-char group-name-end)
 		(delete-region (point) (save-excursion (end-of-line)