; 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.

diff --git a/test/lisp/files-tests.el b/test/lisp/files-tests.el
index 53e6e9064a18cb790f51d56abd51a10ee8d57540..ae8ea41a797ccb5b41aaaa389f672a6f4f386018 100644 (file)
--- a/test/lisp/files-tests.el
+++ b/test/lisp/files-tests.el
@@ -1221,7 +1221,7 @@ See <https://debbugs.gnu.org/19657#20>."
 (ert-deftest files-tests-executable-find ()
   "Test that `executable-find' works also with a relative or remote PATH.
 See <https://debbugs.gnu.org/35241>."
-  (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)