# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 895339991 0
# Node ID dfe597287db160a89ed28fe6fbe59c589e28a3b8
# Parent  aad24611f04cc3f31ef98f10e0ebac9a555a42dc
(ange-ftp-tmp-name-template): Use temporary-file-directory.

diff -r aad24611f04c -r dfe597287db1 lisp/ange-ftp.el
--- a/lisp/ange-ftp.el	Sat May 16 04:14:04 1998 +0000
+++ b/lisp/ange-ftp.el	Sat May 16 17:33:11 1998 +0000
@@ -701,7 +701,7 @@
   :type 'regexp)
 
 (defcustom ange-ftp-tmp-name-template 
-  (concat system-tmp-directory "/ange-ftp")
+  (expand-file-name "ange-ftp" temporary-file-directory)
   "*Template used to create temporary files."
   :group 'ange-ftp
   :type 'directory)