projects
/
elisp
/
wanderlust.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
cc1cf18
)
(wl-summary-delete-messages-on-buffer): Remove progress gauge only when
author
teranisi
<teranisi>
Fri, 28 Apr 2000 04:18:17 +0000
(
04:18
+0000)
committer
teranisi
<teranisi>
Fri, 28 Apr 2000 04:18:17 +0000
(
04:18
+0000)
it was displayed.
wl/wl-summary.el
patch
|
blob
|
history
diff --git
a/wl/wl-summary.el
b/wl/wl-summary.el
index
beed4d1
..
4c2148f
100644
(file)
--- a/
wl/wl-summary.el
+++ b/
wl/wl-summary.el
@@
-4,7
+4,7
@@
;; Author: Yuuichi Teranishi <teranisi@gohome.org>
;; Keywords: mail, net news
;; Author: Yuuichi Teranishi <teranisi@gohome.org>
;; Keywords: mail, net news
-;; Time-stamp: <00/04/28 10:27:22 teranisi>
+;; Time-stamp: <00/04/28 13:03:02 teranisi>
;; This file is part of Wanderlust (Yet Another Message Interface on Emacsen).
;; This file is part of Wanderlust (Yet Another Message Interface on Emacsen).
@@
-1898,8
+1898,9
@@
If optional argument is non-nil, checking is omitted."
'wl-summary-delete-messages-on-buffer "Deleting..."
(/ (* i 100) len))))
(setq msgs (cdr msgs)))
'wl-summary-delete-messages-on-buffer "Deleting..."
(/ (* i 100) len))))
(setq msgs (cdr msgs)))
- (elmo-display-progress
- 'wl-summary-delete-messages-on-buffer "Deleting..." 100)
+ (when deleting-info
+ (elmo-display-progress
+ 'wl-summary-delete-messages-on-buffer "Deleting..." 100))
(if (eq wl-summary-buffer-view 'thread)
(wl-thread-update-line-msgs (elmo-uniq-list update-list)))
(wl-thread-cleanup-symbols msgs2)
(if (eq wl-summary-buffer-view 'thread)
(wl-thread-update-line-msgs (elmo-uniq-list update-list)))
(wl-thread-cleanup-symbols msgs2)