Revert last commit (I'm sorry it was my mistake).

[elisp/wanderlust.git] / elmo / elmo-filter.el

diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el
index 3a29327..11b4cbd 100644 (file)
--- a/elmo/elmo-filter.el
+++ b/elmo/elmo-filter.el
@@ -164,7 +164,10 @@
                                                           mark-alist)
   (let ((unreads (elmo-folder-list-unreads-internal
                  (elmo-filter-folder-target-internal folder)
-                 unread-marks mark-alist)))
+                 unread-marks
+                 (or mark-alist
+                     (elmo-msgdb-get-mark-alist
+                      (elmo-folder-msgdb folder))))))
     (unless (listp unreads)
       (setq unreads
            (delq nil