From: teranisi <teranisi>
Date: Wed, 8 Oct 2003 13:25:51 +0000 (+0000)
Subject: * elmo-pipe.el (elmo-pipe-folder-list-target-messages): Call
X-Git-Tag: wl-2_11_19~8
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=66f9b799fd21a2c431090bb3000e047d1b39a532;p=elisp%2Fwanderlust.git

* elmo-pipe.el (elmo-pipe-folder-list-target-messages): Call
elmo-folder-list-messages with argument `visible-only' as t.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index a98ee58..239a7c9 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,5 +1,8 @@
 2003-10-08  Yuuichi Teranishi  <teranisi@gohome.org>
 
+	* elmo-pipe.el (elmo-pipe-folder-list-target-messages): Call
+	elmo-folder-list-messages with argument `visible-only' as t.
+
 	* elmo-filter.el (elmo-folder-search-requires-msgdb-p): Define.
 	(elmo-folder-msgdb-create): Check the target folder.
 
diff --git a/elmo/elmo-pipe.el b/elmo/elmo-pipe.el
index d363143..44b46d3 100644
--- a/elmo/elmo-pipe.el
+++ b/elmo/elmo-pipe.el
@@ -100,7 +100,7 @@
   (unwind-protect
       (progn
 	(elmo-folder-set-killed-list-internal src ignore-list)
-	(elmo-folder-list-messages src))
+	(elmo-folder-list-messages src t))
     (elmo-folder-set-killed-list-internal src nil)))
 
 (defun elmo-pipe-drain (src dst &optional copy ignore-list)