* wl-summary.el (wl-summary-detect-mark-position): Follow the API

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

diff --git a/elmo/elmo-flag.el b/elmo/elmo-flag.el
index a093091..662ba04 100644 (file)
--- a/elmo/elmo-flag.el
+++ b/elmo/elmo-flag.el
@@ -147,7 +147,7 @@
       (message "Creating msgdb...")
       (while numbers
        (when (setq entity (elmo-localdir-msgdb-create-entity
-                           dir (car numbers)))
+                           new-msgdb dir (car numbers)))
          (elmo-msgdb-append-entity new-msgdb entity
                                    (list (elmo-flag-folder-flag-internal
                                           folder))))