diff options
| author | Richard M. Stallman | 1996-12-07 21:22:27 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1996-12-07 21:22:27 +0000 |
| commit | 1d2517f2edd5f4d6978294ee43b7d55384c133ef (patch) | |
| tree | ed01a54e5067e70944850f22a9a4ed2716a2ab28 | |
| parent | c851323f3dc2af5f903d387602f998a67c1f8f54 (diff) | |
| download | emacs-1d2517f2edd5f4d6978294ee43b7d55384c133ef.tar.gz emacs-1d2517f2edd5f4d6978294ee43b7d55384c133ef.zip | |
(jka-compr-temp-name-template): Initialize using TMPDIR.
| -rw-r--r-- | lisp/jka-compr.el | 3 |
1 files changed, 2 insertions, 1 deletions
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." | |||
| 316 | ;;; from ange-ftp. | 316 | ;;; from ange-ftp. |
| 317 | 317 | ||
| 318 | (defvar jka-compr-temp-name-template | 318 | (defvar jka-compr-temp-name-template |
| 319 | "/tmp/jka-com" | 319 | (expand-file-name "jka-com" |
| 320 | (or (getenv "TMPDIR") "/tmp/")) | ||
| 320 | "Prefix added to all temp files created by jka-compr. | 321 | "Prefix added to all temp files created by jka-compr. |
| 321 | There should be no more than seven characters after the final `/'") | 322 | There should be no more than seven characters after the final `/'") |
| 322 | 323 | ||