* elmo-filter.el (elmo-message-set-cached): Call

`elmo-folder-notify-event' with event `cache-changed'.

* elmo-multi.el (elmo-message-set-cached): Ditto.

* elmo-pipe.el (elmo-message-set-cached): Ditto.

diff --git a/elmo/ChangeLog b/elmo/ChangeLog
index bd97e90..572cf35 100644 (file)
--- a/elmo/ChangeLog
+++ b/elmo/ChangeLog
@@ -1,3 +1,12 @@
+2005-02-16  Hiroya Murata  <lapis-lazuli@pop06.odn.ne.jp>
+
+       * elmo-filter.el (elmo-message-set-cached): Call
+       `elmo-folder-notify-event' with event `cache-changed'.
+
+       * elmo-multi.el (elmo-message-set-cached): Ditto.
+
+       * elmo-pipe.el (elmo-message-set-cached): Ditto.
+
 2005-02-16  Yoichi NAKAYAMA  <yoichi@geiin.org>
 
        * elmo.el (elmo-folder-encache): Abolish.

diff --git a/elmo/elmo-filter.el b/elmo/elmo-filter.el
index 7eb00be..efaa0b4 100644 (file)
--- a/elmo/elmo-filter.el
+++ b/elmo/elmo-filter.el
@@ -345,7 +345,8 @@
 (luna-define-method elmo-message-set-cached ((folder elmo-filter-folder)
                                             number cached)
   (elmo-message-set-cached
-   (elmo-filter-folder-target-internal folder) number cached))
+   (elmo-filter-folder-target-internal folder) number cached)
+  (elmo-folder-notify-event folder 'cache-changed number))
 
 (luna-define-method elmo-message-number ((folder elmo-filter-folder)
                                         message-id)

diff --git a/elmo/elmo-multi.el b/elmo/elmo-multi.el
index b4700b3..2a13b79 100644 (file)
--- a/elmo/elmo-multi.el
+++ b/elmo/elmo-multi.el
@@ -144,7 +144,8 @@
 (luna-define-method elmo-message-set-cached ((folder elmo-multi-folder)
                                             number cached)
   (let ((pair (elmo-multi-real-folder-number folder number)))
-    (elmo-message-set-cached (car pair) (cdr pair) cached)))
+    (elmo-message-set-cached (car pair) (cdr pair) cached))
+  (elmo-folder-notify-event folder 'cache-changed number))
 
 (luna-define-method elmo-find-fetch-strategy ((folder elmo-multi-folder)
                                              number

diff --git a/elmo/elmo-pipe.el b/elmo/elmo-pipe.el
index a62eaf6..ca07964 100644 (file)
--- a/elmo/elmo-pipe.el
+++ b/elmo/elmo-pipe.el
@@ -363,7 +363,8 @@
 (luna-define-method elmo-message-set-cached ((folder elmo-pipe-folder)
                                             number cached)
   (elmo-message-set-cached (elmo-pipe-folder-dst-internal folder)
-                          number cached))
+                          number cached)
+  (elmo-folder-notify-event folder 'cache-changed number))
 
 (luna-define-method elmo-find-fetch-strategy ((folder elmo-pipe-folder)
                                              number