[Mew-Win32 01336] Re: namazu error and perl error

[Hideyuki SHIRAI ( 白井秀行 )]

白井です。

From: kyota at example.com (Kyotaro HORIGUCHI) さん曰く
Subject: [Mew-Win32 01333] Re: namazu error and perl error
Message-ID: <19990413211843F.kyota at example.com>
Date: Tue, 13 Apr 1999 21:18:43 +0900 (JST)

堀口> > 堀口>  出ないなと思ってたらまた出てきました. "malformed NMZ.t format!" 
堀口> > 堀口> ですね. なんでだろう.

堀口> > のエラーの件ですが、僕も出たので、ちょっとファイルを見てみたのですが、
堀口> > namazuのmew-win32のインデックスファイル
堀口> > 
堀口> > ~/namazu/mail/mew-win32/nmz.r
堀口> >               ^^^^^^^^^
堀口> > の中に、なぜかmew-distのファイル名が書かれてました。
堀口> > mknmzに渡すファイル名とか、その時のtmpファイルとかが
堀口> > まざっちゃってるんでしょうか?

が〜〜ん (;_;)

ちゃんと(?) Win32 対応をするまでは、これ、しょっちゅう発生してい
たんです。mew-namazu-make-temp-name() じゃだめなのかなぁ。

これが原因かどうか確かめたいので、下のパッチをあててみていただけ
ませんか？原因が違うとちょっとめんどくさいかもしれないです。

1. もし、temp-name が原因なら、もう発生しない(と思う)。
2. temp-name が重なったら、Warning を出す(と思う)。

です。(ding) もいれた方がいいかな。

--- mew-namazu.el.orig  Tue Apr 13 09:51:45 1999
+++ mew-namazu.el       Wed Apr 14 08:38:07 1999
@@ -379,6 +379,11 @@
                                    (mew-namazu-make-temp-name "mknmz_") mew-temp-dir))
                        (prog-args mew-namazu-prog-mknmz-args)
                        (exist-msg nil))
+                   (while (and mew-namazu-use-backslash (file-exists-p temp-file))
+                     (message "Warning!! same name det.")
+                     (sit-for 1)
+                     (setq temp-file (expand-file-name
+                                      (mew-namazu-make-temp-name "mknmz_") mew-temp-dir)))
                    (mew-set-buffer-tmp)
                    (mapcar '(lambda (file)
                               (if  (not (string-match "^[1-9][0-9]*$" file))