# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 895289939 0
# Node ID e8163732f7b46f30116b3a2a97d0ae2207fd1929
# Parent  08f31e440c9221e17b421a2e64016e5b2b52ab50
(ange-ftp-tmp-name-template): Use system-tmp-directory.

diff -r 08f31e440c92 -r e8163732f7b4 lisp/ange-ftp.el
--- a/lisp/ange-ftp.el	Sat May 16 03:38:20 1998 +0000
+++ b/lisp/ange-ftp.el	Sat May 16 03:38:59 1998 +0000
@@ -700,10 +700,8 @@
   :group 'ange-ftp
   :type 'regexp)
 
-(defcustom ange-ftp-tmp-name-template
-  (if (memq system-type '(ms-dos windows-nt))
-      (concat (or (getenv "TEMP") (getenv "TMP") "c:/temp") "/ange-ftp")
-    "/tmp/ange-ftp")
+(defcustom ange-ftp-tmp-name-template 
+  (concat system-tmp-directory "/ange-ftp")
   "*Template used to create temporary files."
   :group 'ange-ftp
   :type 'directory)