* test/lisp/simple-tests.el: Full path to Emacs binary (bug#39067).

This commit is contained in:
Mattias Engdegård 2020-01-20 14:27:38 +01:00
parent 92f30d62c0
commit 891f7de8ed

View file

@ -723,7 +723,9 @@ See Bug#21722."
`(let* ((,caller-buf (generate-new-buffer "caller-buf"))
(,output-buf (if ,output-buffer-is-current ,caller-buf
(generate-new-buffer "output-buf")))
(,command (format "%s -Q --batch --eval '(princ \"%s\")'" invocation-name ,str))
(emacs (expand-file-name invocation-name invocation-directory))
(,command (format "%s -Q --batch --eval '(princ \"%s\")'"
emacs ,str))
(inhibit-message t))
(unwind-protect
;; Feature must work the same regardless how we specify the 2nd arg of `shell-command', ie,