Mercurial > emacs

changeset 22090:0072d85ea09a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(jka-compr-temp-name-template): Use system-tmp-directory
author Richard M. Stallman <rms@gnu.org>
date Sat, 16 May 1998 03:43:44 +0000
parents 171bb1a9c260
children 87994c0c7908
files lisp/jka-compr.el
diffstat 1 files changed, 1 insertions(+), 5 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/jka-compr.el	Sat May 16 03:43:28 1998 +0000
+++ b/lisp/jka-compr.el	Sat May 16 03:43:44 1998 +0000
@@ -347,11 +347,7 @@
 ;;; 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