From 9531ab86d9f875b7e88e8beb63d7b5f49368e24a Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Thu, 2 Sep 1999 12:24:54 +0000 Subject: [PATCH] (small-temporary-file-directory): New variable. --- lisp/files.el | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/lisp/files.el b/lisp/files.el index ee0e0c37f85..5383a598e2c 100644 --- a/lisp/files.el +++ b/lisp/files.el @@ -380,6 +380,12 @@ and ignores this variable." (or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP") "/tmp")))) "The directory for writing temporary files.") +(defvar small-temporary-file-directory + (if (eq system-type 'ms-dos) (getenv "TMPDIR") temporary-file-directory) + "The directory for writing small temporary files. +This is for systems that have fast storage with limited space, +such as a RAM disk.") + ;; The system null device. (Should reference NULL_DEVICE from C.) (defvar null-device "/dev/null" "The system null device.") -- 2.39.5