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

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index 10f6665..2b314b9 100644 (file)
--- 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 (file)
--- 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