changeset 16630:b337bd642856

(jka-compr-temp-name-template): Initialize using TMPDIR.
author Richard M. Stallman <rms@gnu.org>
date Sat, 07 Dec 1996 21:22:27 +0000
parents a3345c8d1779
children 024d3847af99
files lisp/jka-compr.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/jka-compr.el	Sat Dec 07 21:20:10 1996 +0000
+++ b/lisp/jka-compr.el	Sat Dec 07 21:22:27 1996 +0000
@@ -316,7 +316,8 @@
 ;;; 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 `/'")