From: Lars Ingebrigtsen <larsi@gnus.org>
Date: Sat, 25 Sep 2021 00:55:55 +0000 (+0200)
Subject: Use `temporary-file-directory' in `with-existing-directory'
X-Git-Tag: emacs-28.0.90~674
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=7a7235899429d5adaec92d7184208db53448d81a;p=emacs.git

Use `temporary-file-directory' in `with-existing-directory'

* lisp/subr.el (with-existing-directory): Use
`temporary-file-directory' over TMPDIR.
---

diff --git a/lisp/subr.el b/lisp/subr.el
index 2d2794cfd1f..fd1ceb95f53 100644
--- a/lisp/subr.el
+++ b/lisp/subr.el
@@ -4636,6 +4636,7 @@ If `default-directory' is already an existing directory, it's not changed."
                                              (file-exists-p dir)))
                                       (list default-directory
                                             (expand-file-name "~/")
+                                            temporary-file-directory
                                             (getenv "TMPDIR")
                                             "/tmp/")
                                       "/")))