(elmo-map-message-fetch): Fixed last change.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index a8d3c4c..5c5d092 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2005-01-14  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * elmo-maildir.el (elmo-map-message-fetch): Fixed last change.
+
 2005-01-13  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
        * elmo-shimbun.el (elmo-folder-plugged-p): Treat "@" as

diff --git a/elmo/elmo-maildir.el b/elmo/elmo-maildir.el
index b127b50..4fb0dd0 100644 (file)
--- a/elmo/elmo-maildir.el
+++ b/elmo/elmo-maildir.el
@@ -498,7 +498,7 @@ file name for maildir directories."
     (when (file-exists-p file)
       (insert-file-contents-as-binary file)
       (unless unseen
-       (elmo-map-folder-set-flag folder location 'read))
+       (elmo-map-folder-set-flag folder (list location) 'read))
       t)))
 
 (luna-define-method elmo-folder-exists-p ((folder elmo-maildir-folder))