Commit 56794ac6 authored by Michael Albinus's avatar Michael Albinus

Fix Bug#31022

* lisp/cus-start.el (temporary-file-directory): Suppress file name
handlers when calling `shell-command-to-string'.  (Bug#31022)
parent a231c33e
......@@ -277,9 +277,10 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
((eq system-type 'darwin)
(or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP")
;; See bug#7135.
(let ((tmp (ignore-errors
(shell-command-to-string
"getconf DARWIN_USER_TEMP_DIR"))))
(let* (file-name-handler-alist
(tmp (ignore-errors
(shell-command-to-string
"getconf DARWIN_USER_TEMP_DIR"))))
(and (stringp tmp)
(setq tmp (replace-regexp-in-string
"\n\\'" "" tmp))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment