From: teranisi <teranisi>
Date: Wed, 18 Apr 2001 09:10:57 +0000 (+0000)
Subject: * elmo-msgdb.el (elmo-msgdb-flist-load): Use elmo-mime-charset.
X-Git-Tag: wl-2_6-root^3~42
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=b95bd6475e764be3ad93baf4de281d6ad8223d89;p=elisp%2Fwanderlust.git

* elmo-msgdb.el (elmo-msgdb-flist-load): Use elmo-mime-charset.
 (elmo-msgdb-flist-save): Ditto.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 9cd1de2..3763ddf 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,8 @@
+2001-04-18  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* elmo-msgdb.el (elmo-msgdb-flist-load): Use elmo-mime-charset.
+	(elmo-msgdb-flist-save): Ditto.
+
 2001-4-18  Yuuichi Teranishi  <teranisi@gohome.org>
 
 	* elmo-shimbun.el (elmo-folder-list-subfolders):
diff --git a/elmo/elmo-msgdb.el b/elmo/elmo-msgdb.el
index 76e4a78..ede79f5 100644
--- a/elmo/elmo-msgdb.el
+++ b/elmo/elmo-msgdb.el
@@ -551,7 +551,7 @@ content of MSGDB is changed."
 		     (expand-file-name
 		      (elmo-safe-filename fname)
 		      (expand-file-name "folder" elmo-msgdb-dir)))))
-    (elmo-object-load flist-file nil t)))
+    (elmo-object-load flist-file elmo-mime-charset t)))
 
 (defun elmo-msgdb-flist-save (fname flist)
   (let ((flist-file (expand-file-name
@@ -559,7 +559,7 @@ content of MSGDB is changed."
 		     (expand-file-name
 		      (elmo-safe-filename fname)
 		      (expand-file-name "folder" elmo-msgdb-dir)))))
-    (elmo-object-save flist-file flist)))
+    (elmo-object-save flist-file flist elmo-mime-charset)))
 
 (defun elmo-crosspost-alist-load ()
   (elmo-object-load (expand-file-name