From: hmurata <hmurata>
Date: Thu, 18 Sep 2003 09:28:42 +0000 (+0000)
Subject: * elmo-flag.el (elmo-folder-commit): Use `elmo-folder-msgdb-path'.
X-Git-Tag: wl-2_11_15~6
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=1563b3fde6e80cd9b38fb67744553b44fdc58c64;p=elisp%2Fwanderlust.git

* elmo-flag.el (elmo-folder-commit): Use `elmo-folder-msgdb-path'.
---

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 10f6665..2b314b9 100644
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,7 +1,8 @@
 2003-09-18  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
 
 	* elmo-flag.el (elmo-folder-expand-msgdb-path): Define.
-	(elmo-folder-initialize): Use it.
+	(elmo-folder-initialize): Use `elmo-folder-msgdb-path'.
+	(elmo-folder-commit): Ditto.
 
 2003-09-18  Yuuichi Teranishi  <teranisi@gohome.org>
 
diff --git a/elmo/elmo-flag.el b/elmo/elmo-flag.el
index 52f1062..9275842 100644
--- a/elmo/elmo-flag.el
+++ b/elmo/elmo-flag.el
@@ -93,10 +93,7 @@
 (luna-define-method elmo-folder-commit :after ((folder
 						elmo-flag-folder))
   (elmo-object-save
-   (expand-file-name (concat "flag/"
-			     (symbol-name
-			      (elmo-flag-folder-flag-internal folder))
-			     "/.minfo") elmo-msgdb-directory)
+   (expand-file-name ".minfo" (elmo-folder-msgdb-path folder))
    (elmo-flag-folder-minfo-internal folder)))
 
 (defun elmo-flag-folder-delete-message (folder number