Mercurial > emacs
changeset 22143:468e3489f1c0
(temporary-file-directory): Renamed from system-tmp-directory.
Value is now a directory name, not a file name.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Tue, 19 May 1998 05:21:42 +0000 |
parents | a63710b545db |
children | 632fc074e4d7 |
files | lisp/files.el |
diffstat | 1 files changed, 3 insertions(+), 3 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/files.el Tue May 19 05:12:47 1998 +0000 +++ b/lisp/files.el Tue May 19 05:21:42 1998 +0000 @@ -343,15 +343,15 @@ (defvar view-read-only nil "*Non-nil means buffers visiting files read-only, do it in view mode.") -(defvar system-tmp-directory - (directory-file-name +(defvar temporary-file-directory + (file-name-as-directory (cond ((memq system-type '(ms-dos windows-nt)) (or (getenv "TEMP") (getenv "TMPDIR") (getenv "TMP") "c:/temp")) ((memq system-type '(vax-vms axp-vms)) (or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP") "SYS$SCRATCH:")) (t (or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP") "/tmp")))) - "The directory for writing temporary files--actually, its name as a file.") + "The directory for writing temporary files.") ;; This hook function provides support for ange-ftp host name ;; completion. It runs the usual ange-ftp hook, but only for