From 0adf5079bfb49cb7096df44d956a1f7bd606f47d Mon Sep 17 00:00:00 2001
From: "Richard M. Stallman" <rms@gnu.org>
Date: Sat, 16 May 1998 17:34:20 +0000
Subject: [PATCH] (archive-tmpdir): Use temporary-file-directory.

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

diff --git a/lisp/arc-mode.el b/lisp/arc-mode.el
index d365e59c26d..fc5497d6faf 100644
--- a/lisp/arc-mode.el
+++ b/lisp/arc-mode.el
@@ -122,7 +122,7 @@
 (defcustom archive-tmpdir
   (make-temp-name
    (expand-file-name (if (eq system-type 'ms-dos) "ar" "archive.tmp")
-		     system-tmp-directory))
+		     temporary-file-directory))
   "*Directory for temporary files made by arc-mode.el"
   :type 'directory
   :group 'archive)
-- 
2.39.2