From a536e299736886f3e7d9c1185c380d67e974679f Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sat, 16 May 1998 17:33:11 +0000
Subject: [PATCH] (ange-ftp-tmp-name-template): Use temporary-file-directory.

---
 lisp/ange-ftp.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/ange-ftp.el b/lisp/ange-ftp.el
index ecee7db88df..0002e3f3c77 100644
--- a/lisp/ange-ftp.el
+++ b/lisp/ange-ftp.el
@@ -701,7 +701,7 @@ These mean that the FTP process should (or already has) been killed."
   :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)
-- 
2.39.2