From: hmurata <hmurata>
Date: Mon, 15 Sep 2003 01:04:36 +0000 (+0000)
Subject: * elmo-mark.el (elmo-mark-folder-msgdb-create): Use flag instead
X-Git-Tag: wl-2_11_13~2
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=7fb0171db5c5dd4c0e2433c32912b2308f2d7ce1;p=elisp%2Fwanderlust.git

* elmo-mark.el (elmo-mark-folder-msgdb-create): Use flag instead
of mark.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index d3f1d36..a7f693b 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2003-09-15  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+	* elmo-mark.el (elmo-mark-folder-msgdb-create): Use flag instead
+	of mark.
+
 2003-09-14  TAKAHASHI Kaoru  <kaoru@kaisei.org>
 
 	* elmo-imap4.el (elmo-imap4-fetch-callback-1-subr): Fixed paren
diff --git a/elmo/elmo-mark.el b/elmo/elmo-mark.el
index 4215f7a..26dbe84 100644
--- a/elmo/elmo-mark.el
+++ b/elmo/elmo-mark.el
@@ -100,7 +100,8 @@
       (when entity
 	(elmo-msgdb-append-entity new-msgdb
 				  entity
-				  (elmo-mark-folder-mark-internal folder)))
+				  (elmo-msgdb-mark-to-flags
+				   (elmo-mark-folder-mark-internal folder))))
       (when (> len elmo-display-progress-threshold)
 	(setq i (1+ i))
 	(elmo-display-progress