From 56794ac6c7fb1ca1dd1fd8dfb0ac40e20901f2c0 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Tue, 3 Apr 2018 09:51:01 +0200 Subject: [PATCH] Fix Bug#31022 * lisp/cus-start.el (temporary-file-directory): Suppress file name handlers when calling `shell-command-to-string'. (Bug#31022) --- lisp/cus-start.el | 7 ++++--- 1 file changed, 4 insertions(+), 3 deletions(-) diff --git a/lisp/cus-start.el b/lisp/cus-start.el index dace6f79549..451e7f762f4 100644 --- a/lisp/cus-start.el +++ b/lisp/cus-start.el @@ -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)) -- 2.39.2