* wl/wl-summary.el (wl-summary-mode): Check with fboundp before calling `make-local...

[elisp/wanderlust.git] / elmo / elmo-filter.el

diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el
index 5d3ec54..65aacfa 100644 (file)
--- a/elmo/elmo-filter.el
+++ b/elmo/elmo-filter.el
@@ -156,6 +156,9 @@
 (luna-define-method elmo-folder-open-internal ((folder elmo-filter-folder))
   (elmo-folder-open-internal (elmo-filter-folder-target-internal folder)))
 
+(luna-define-method elmo-folder-open-internal-p ((folder elmo-filter-folder))
+  (elmo-folder-open-internal-p (elmo-filter-folder-target-internal folder)))
+
 (luna-define-method elmo-folder-check ((folder elmo-filter-folder))
   (when (elmo-filter-folder-require-msgdb-internal folder)
     (elmo-folder-synchronize (elmo-filter-folder-target-internal folder))))
@@ -223,6 +226,24 @@
    (elmo-filter-folder-target-internal folder)
    flag number))
 
+(defun elmo-folder-append-messages-filter-* (dst-folder
+                                            src-folder
+                                            numbers
+                                            same-number)
+  (elmo-folder-append-messages dst-folder
+                              (elmo-filter-folder-target-internal src-folder)
+                              numbers
+                              same-number))
+
+(defun elmo-folder-append-messages-*-filter (dst-folder
+                                            src-folder
+                                            numbers
+                                            same-number)
+  (elmo-folder-append-messages (elmo-filter-folder-target-internal dst-folder)
+                              src-folder
+                              numbers
+                              same-number))
+
 (luna-define-method elmo-message-fetch-bodystructure ((folder
                                                       elmo-filter-folder)
                                                      number strategy)