From: Richard M. Stallman <rms@gnu.org>
Date: Sat, 16 May 1998 03:43:44 +0000 (+0000)
Subject: (jka-compr-temp-name-template): Use system-tmp-directory
X-Git-Tag: emacs-20.3~987
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7b559d168fcb75d3d86f12f321059fe656c4cac2;p=emacs.git

(jka-compr-temp-name-template): Use system-tmp-directory
---

diff --git a/lisp/jka-compr.el b/lisp/jka-compr.el
index 0f02f74df8a..bffa1fc6f02 100644
--- a/lisp/jka-compr.el
+++ b/lisp/jka-compr.el
@@ -347,11 +347,7 @@ to keep: LEN chars starting BEG chars from the beginning."
 ;;; from ange-ftp.
 
 (defcustom jka-compr-temp-name-template
-  (expand-file-name "jka-com"
-		    (if (memq system-type '(ms-dos windows-nt))
-			(concat (or (getenv "TEMP") (getenv "TMP") "c:/temp") 
-				"/")
-		      (or (getenv "TMPDIR") "/tmp/")))
+  (expand-file-name "jka-com" system-tmp-directory)
   "Prefix added to all temp files created by jka-compr.
 There should be no more than seven characters after the final `/'."
   :type 'string