From: hmurata <hmurata>
Date: Fri, 14 Jan 2005 11:08:37 +0000 (+0000)
Subject: (elmo-map-message-fetch): Fixed last change.
X-Git-Tag: wl-2_14-root~86
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=9d9bcc5c8209cf7ad198599811700f26f1b811f9;p=elisp%2Fwanderlust.git

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

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index a8d3c4c..5c5d092 100644
--- 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
--- 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))