From: teranisi <teranisi>
Date: Fri, 15 Dec 2000 05:29:08 +0000 (+0000)
Subject: * wl-summary.el (wl-summary-mark-as-important): Remove cache if	folder
X-Git-Tag: wl-2_4_1pre~50
X-Git-Url: http://git.chise.org/gitweb/?a=commitdiff_plain;h=54f6b0c797fac54164e64317012d8bbdccd05495;p=elisp%2Fwanderlust.git

* wl-summary.el (wl-summary-mark-as-important): Remove cache if	folder
 is local.
---

diff --git a/wl/ChangeLog b/wl/ChangeLog
index 2f4a4ab..82a344e 100644
--- a/wl/ChangeLog
+++ b/wl/ChangeLog
@@ -1,3 +1,8 @@
+2000-12-15  Yuuichi Teranishi  <teranisi@gohome.org>
+
+	* wl-summary.el (wl-summary-mark-as-important):
+	Remove cache if	folder is local.
+
 2000-12-06  Taro Kawagishi <taro.kawagishi@nokia.com>
 
 	* wl-summary.el (wl-summary-edit-addresses-subr): Call `try-completion'
diff --git a/wl/wl-summary.el b/wl/wl-summary.el
index 38f92da..fb81609 100644
--- a/wl/wl-summary.el
+++ b/wl/wl-summary.el
@@ -4337,6 +4337,9 @@ If ARG, exit virtual folder."
 		  (unless no-server-update
 		    (elmo-unmark-important folder (list number) msgdb)
 		    (elmo-msgdb-global-mark-delete message-id))
+		  ;; Remove cache if local it is folder.
+		  (if (elmo-folder-local-p folder)
+		      (elmo-cache-delete message-id folder number))
 		  (when visible
 		    (delete-region (match-beginning 2) (match-end 2))
 		    (insert " "))