[Mew-dist 12715] RE: タイムスタンプを使うimmknmz

[KOIE Hidetaka ( 鯉江英隆 )]

From: KOIE Hidetaka (鯉江英隆) <hide at example.com>
Subject: [Mew-dist 12714] RE: タイムスタンプを使うimmknmz
Date: Wed, 22 Mar 2000 20:12:25 +0900

  | (setq mew-touch-folder-p t)のときには
  | refileやrmしたときには元フォルダの.mew-cacheのmtimeが更新されないので
  | ちょっと具合がわるいです。
  | refile直後に元フォルダの.mew-touchのmtimeを
  | .mew-cacheと同じに設定すると解決できそうです。

てきとうに実装してみました。

mew-touch-folder-p指定していると
mew-summary-goto-folder (g)したときに
自動的にスキャンしてくれないのですが
これはwrite-regionは書き込み量がzeroの場合には
ファイルを更新ないのが原因のようです。

diff -pu -F'^(' mew-func.el.~1~ mew-func.el
-------------------------------------------
--- mew-func.el.~1~	Thu Mar  9 18:03:29 2000
+++ mew-func.el	Thu Mar 23 08:40:09 2000
@@ -618,7 +618,7 @@ (defun mew-touch-folder (fld)
       (let ((file (expand-file-name mew-summary-touch-file
 				    (mew-expand-folder fld))))
 	(if (file-writable-p file)
-	    (write-region (point-min) (point-min) file nil 'no-msg)))))
+	    (write-region "xxx" nil file nil 'no-msg)))))
 
 ;;
 ;; Directory
-------------------------------------------

diff -pu -F'^(' mew-mark.el.~1~ mew-mark.el
-------------------------------------------
--- mew-mark.el.~1~	Thu Mar  9 18:03:30 2000
+++ mew-mark.el	Thu Mar 23 08:43:38 2000
@@ -434,6 +434,7 @@ (defun mew-summary-exec-region (beg end)
 		 ;; ending...
 		 (mew-mark-kill-line-region (point-min) (point-max))
 		 (mew-summary-folder-cache-save)
+                 (mew-touch-folder (buffer-name))
 		 (mew-refile-guess-save)
 		 (run-hooks 'mew-summary-exec-hook)
 		 (set-buffer-modified-p nil)
-------------------------------------------

From: KOIE Hidetaka (鯉江英隆) <hide at example.com>
Subject: [Mew-dist 12712] RE: タイムスタンプを使うimmknmz
Date: Wed, 22 Mar 2000 19:15:40 +0900

  |   | 鯉江>     3.リファイル先のフォルダに移動
  |   | 鯉江>       (自動でscanされる)
  |   | 
  |   | ここで、+folder/.mew-cache が書き込まれるから mtime も変わるのだ
  |   | と思います。
  | 
  | (unixでは)ディレクトリのmtimeが更新されるのは
  | ファイルを作ったり削除したりするときです。
  | .mew-cacheを上書きするだけならディレクトリのmtimeは変らないはずです。

emacsはロックファイル `.#FILE' をつくるので
結果的にディレクトリのmtimeが変ってしまうのでした。

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