mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-07 23:10:28 -08:00
Code Issues Projects Releases Wiki Activity

Fix Bug#31022

Browse source 
* lisp/cus-start.el (temporary-file-directory): Suppress file name
handlers when calling `shell-command-to-string'.  (Bug#31022)
This commit is contained in:
Michael Albinus 2018-04-03 09:51:01 +02:00
parent a231c33eab
commit 56794ac6c7
1 changed files with 4 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lisp/cus-start.el
View file

@ -277,7 +277,8 @@ Leaving \"Default\" unchecked is equivalent with specifying a default of
((eq system-type 'darwin) ((eq system-type 'darwin)
(or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP") (or (getenv "TMPDIR") (getenv "TMP") (getenv "TEMP")
;; See bug#7135. ;; See bug#7135.
(let ((tmp (ignore-errors (let* (file-name-handler-alist
(tmp (ignore-errors
(shell-command-to-string (shell-command-to-string
"getconf DARWIN_USER_TEMP_DIR")))) "getconf DARWIN_USER_TEMP_DIR"))))
(and (stringp tmp) (and (stringp tmp)