Fix a problem of cus-start.el for remote default directories

* lisp/cus-start.el: Bind `default-directory' to "/" when calling
`shell-command-to-string' for a local value on DARWIN.
This commit is contained in:
Michael Albinus 2021-07-02 10:01:46 +02:00
parent 1b88404acc
commit aaa32f3942

View file

@ -285,6 +285,7 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
(or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP")
;; See bug#7135.
(let* (file-name-handler-alist
(default-directory "/")
(tmp (ignore-errors
(shell-command-to-string
"getconf DARWIN_USER_TEMP_DIR"))))