(small-temporary-file-directory): Make it nil except on ms-dos.

diff --git a/lisp/files.el b/lisp/files.el
index 5383a598e2c81833ae393b145f4b329924ee33b8..17a9e78c7dfc3e783e5a119f01b14a540887d026 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -381,10 +381,11 @@ and ignores this variable."
   "The directory for writing temporary files.")
 
 (defvar small-temporary-file-directory
-  (if (eq system-type 'ms-dos) (getenv "TMPDIR") temporary-file-directory)
+  (if (eq system-type 'ms-dos) (getenv "TMPDIR"))
   "The directory for writing small temporary files.
-This is for systems that have fast storage with limited space,
-such as a RAM disk.")
+If non-nil, this directory is used instead of `temporary-file-directory'
+by programs that create 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.")