From 1d2517f2edd5f4d6978294ee43b7d55384c133ef Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sat, 7 Dec 1996 21:22:27 +0000 Subject: [PATCH] (jka-compr-temp-name-template): Initialize using TMPDIR. --- lisp/jka-compr.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el index 02c32e4b70e..ef1a25f591a 100644 --- a/lisp/jka-compr.el +++ b/lisp/jka-compr.el @@ -316,7 +316,8 @@ to keep: LEN chars starting BEG chars from the beginning." ;;; from ange-ftp. (defvar jka-compr-temp-name-template - "/tmp/jka-com" + (expand-file-name "jka-com" + (or (getenv "TMPDIR") "/tmp/")) "Prefix added to all temp files created by jka-compr. There should be no more than seven characters after the final `/'") -- 2.39.5