* files.el (auto-save-file-name-transforms): Put remote files in

	temporary-file-directory rather than /tmp.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 8b6a6b97e3d57669b694834c66a0ccdfc5be99e4..da78448299e59d7b21c2c5f669c48477ad482198 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2001-11-20  Kai Grossjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+
+       * files.el (auto-save-file-name-transforms): Put remote files in
+       temporary-file-directory rather than /tmp.
+
 2001-11-21  Colin Walters  <walters@debian.org>
 
        * calc/calc-macs.el (calc-slow-wrapper): Move (point) call outside

diff --git a/lisp/files.el b/lisp/files.el
index 5369a597deb5b6be7a7acd078cd74c0dbb8c40c3..8d447f8e7a85e9d5e1250025b4f28e82028485e2 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -286,7 +286,8 @@ Normally auto-save files are written under other names."
   :group 'auto-save)
 
 (defcustom auto-save-file-name-transforms
-  '(("\\`/[^/]*:\\(.+/\\)*\\(.*\\)" "/tmp/\\2"))
+  `(("\\`/[^/]*:\\(.+/\\)*\\(.*\\)"
+     ,(expand-file-name "\\2" temporary-file-directory)))
   "*Transforms to apply to buffer file name before making auto-save file name.
 Each transform is a list (REGEXP REPLACEMENT):
 REGEXP is a regular expression to match against the file name.
@@ -296,8 +297,9 @@ All the transforms in the list are tried, in the order they are listed.
 When one transform applies, its result is final;
 no further transforms are tried.
 
-The default value is set up to put the auto-save file into `/tmp'
-for editing a remote file."
+The default value is set up to put the auto-save file into the
+temporary directory (see the variable `temporary-file-directory') for
+editing a remote file."
   :group 'auto-save
   :type '(repeat (list (string :tag "Regexp") (string :tag "Replacement")))
   :version "21.1")