[Mew-dist 16580] RE: b107

KOIE Hidetaka ( 鯉江英隆 ) hide at example.com
2001年 2月 22日 (木) 17:58:07 JST


 From:       Kazu Yamamoto (山本和彦) <kazu at example.com>
 Subject:    [Mew-dist 16561] b107
 Date:       Thu, 22 Feb 2001 01:17:08 +0900
 Message-Id: <20010222.005501.68548425.kazu at example.com>

  | b107 をリリースします。

  | - などなど。

b107で実装された Flushing caches when 'x'. ですが
皆殺しにしなくても..

--- mew-mark.el.~1~	Tue Feb 20 14:26:21 2001
+++ mew-mark.el	Thu Feb 22 17:53:05 2001
@@ -774,6 +774,8 @@ (defun mew-summary-exec-region (beg end)
 			   (message
 			    "Nothing proceeded. Folder(s) MUST be a file!: %s"
 			    (mew-join "," err-folders))))
+                     ;(message "src:%s msgs:%s" src msgs)
+                     (mapcar (lambda (msg) (mew-cache-delete2 src msg)) msgs)
 		     (funcall func-exec src msgs))))
 	       (if (= cnt 0)
 		   (message "No marks")
@@ -785,7 +787,7 @@ (defun mew-summary-exec-region (beg end)
 		 (run-hooks 'mew-summary-exec-hook)
 		 (set-buffer-modified-p nil)
 		 (mew-summary-reset-mode-line (current-buffer))
-		 (mew-cache-flush)
+		 ;(mew-cache-flush)
 		 (message "Refiling and deleting ... done")))
 	   (quit
 	    (set-buffer-modified-p nil)

..この程度で済ませられないでしょうか。

このパッチではキャッシュを捨てるタイミングが前の方に移動してますが
これで適切なのかどうかは判断できませんでした。

--
KOIE Hidetaka 鯉江英隆 <hide at example.com>



Mew-dist メーリングリストの案内