From 63a190a640f620f49b42e70e9e68f88e61c158b3 Mon Sep 17 00:00:00 2001 From: Noam Postavsky Date: Wed, 17 Apr 2019 10:24:12 -0400 Subject: [PATCH] ; Fix files-tests-executable-find on w32 (Bug#35241) * test/lisp/files-tests.el (files-tests-executable-find): Make the tmpfile end with one of exec-suffixes, so that it will be executable on w32. --- test/lisp/files-tests.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el index 53e6e9064a1..ae8ea41a797 100644 --- a/test/lisp/files-tests.el +++ b/test/lisp/files-tests.el @@ -1221,7 +1221,7 @@ See ." (ert-deftest files-tests-executable-find () "Test that `executable-find' works also with a relative or remote PATH. See ." - (let ((tmpfile (make-temp-file "files-test"))) + (let ((tmpfile (make-temp-file "files-test" nil (car exec-suffixes)))) (unwind-protect (progn (set-file-modes tmpfile #o777) -- 2.39.5