(elmo-message-folder): Define.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index c386d4e..82bcd81 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,7 @@
+2004-02-15  Tetsurou Okazaki  <okazaki@be.to>
+
+       * elmo-filter.el (elmo-message-folder): Define.
+
 2004-02-13  Yuuichi Teranishi  <teranisi@gohome.org>
 
        * elmo.el (elmo-message-fetch-with-cache-process): Don't call

diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el
index 460e18a..b555399 100644 (file)
--- a/elmo/elmo-filter.el
+++ b/elmo/elmo-filter.el
@@ -270,6 +270,10 @@
   (elmo-folder-unset-flag (elmo-filter-folder-target-internal folder)
                          numbers flag is-local))
 
+(luna-define-method elmo-message-folder ((folder elmo-filter-folder)
+                                        number)
+  (elmo-message-folder (elmo-filter-folder-target-internal folder) number))
+
 (require 'product)
 (product-provide (provide 'elmo-filter) (require 'elmo-version))