[Mew-dist 1898] 'mew-temp-file-initial patch

[OKUNISHI Fujikazu]

今のままでも＊普通(*1)の＊使い方では不具合はありませんが，
mew-temp-file-initial をこのように変えることは可能でしょうか? > かずさん

--- mew.el.orig	Tue Aug 26 09:59:26 1997
+++ mew.el	Fri Sep 04 21:25:04 1997
@@ -276,7 +276,8 @@
   "*If non-nil, a message or a part is appended to the existing file
 on mew-summary-save(\"y\"). Otherwise overwrited.")
 
-(defvar mew-temp-file-initial (expand-file-name (user-login-name) "/tmp")
+(defvar mew-temp-file-initial
+  (expand-file-name (user-login-name) (or (getenv "TMP") "/tmp"))
   "*Hint to make a secure directory on the local file system.
 On setup phase Mew make a secure directory from this variable
 and set mew-temp-file a file name prefex contained the directory name.

Emacs の起動ドライブに関わらず常に同じ /tmp に書き込むように標準で対応
して欲しいからです。いかがでしょう?

;; そのための defvar だと言われればそれまでなので mew-os2.el に引っ越
;; します。(^_^;
--
(ふ)

(*1) 普通でない使い方：
TVFS でマウントされた仮想ドライブに /tmp を書き込み可能な状態でリンク
を張っておかなかった状態で Emacs を起動し，Mew を動作させた場合。当然
外部プロセスに渡すためのファイルを書き込もうとした時点でエラーが出る。