emacs-27 3543b9f: ; Fix a test (Bug#39067)

[Tino Calancha]

branch: emacs-27
commit 3543b9fad9c48556e298085c49bcad38e67d4d83
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>

    ; Fix a test (Bug#39067)
    
    * test/lisp/simple-tests.el (with-shell-command-dont-erase-buffer):
    Use flag -Q to prevent from loading site-lisp files.
---
 test/lisp/simple-tests.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/test/lisp/simple-tests.el b/test/lisp/simple-tests.el
index 0b12cee..8ef3c88 100644
--- a/test/lisp/simple-tests.el
+++ b/test/lisp/simple-tests.el
@@ -723,7 +723,7 @@ 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 --batch --eval '(princ \"%s\")'" 
invocation-name ,str))
+            (,command (format "%s -Q --batch --eval '(princ \"%s\")'" 
invocation-name ,str))
             (inhibit-message t))
        (unwind-protect
            ;; Feature must work the same regardless how we specify the 2nd arg 
of `shell-command', ie,