From: teranisi <teranisi>
Date: Wed, 8 Oct 2003 13:02:04 +0000 (+0000)
Subject: * elmo-filter.el (elmo-folder-msgdb-create): Check the target folder.
X-Git-Tag: wl-2_11_19~9
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=ba08359f39719d62667fbacad55df41a92bf51d4;p=elisp%2Fwanderlust.git

* elmo-filter.el (elmo-folder-msgdb-create): Check the target folder.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 716a536..a98ee58 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,6 +1,7 @@
 2003-10-08  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* elmo-filter.el (elmo-folder-search-requires-msgdb-p): Define.
+	(elmo-folder-msgdb-create): Check the target folder.
 
 2003-10-07  Yuuichi Teranishi  <teranisi@gohome.org>
 
diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el
index 10c469c..575b804 100644
--- a/elmo/elmo-filter.el
+++ b/elmo/elmo-filter.el
@@ -119,7 +119,9 @@
   (if (elmo-filter-folder-require-msgdb-internal folder)
       (let* ((target-folder (elmo-filter-folder-target-internal folder))
 	     (len (length numlist))
-	     (msgdb (elmo-folder-msgdb target-folder))
+	     (msgdb (progn
+		      (elmo-folder-check target-folder)
+		      (elmo-folder-msgdb target-folder)))
 	     (new-msgdb (elmo-make-msgdb))
 	     message-id entity)
 	(when (> len elmo-display-progress-threshold)