Fix failing eshell alias tests

* test/lisp/eshell/esh-var-tests.el (esh-var-test/alias/function)
(esh-var-test/alias/symbol-pair): Fix tests.  (Bug#59062)

diff --git a/test/lisp/eshell/esh-var-tests.el b/test/lisp/eshell/esh-var-tests.el
index d9b2585a327f5123feef7d1c6aecd4d7d58e97a0..245a8e6a26bf939fd76cb244a968c50521d84001 100644 (file)
--- a/test/lisp/eshell/esh-var-tests.el
+++ b/test/lisp/eshell/esh-var-tests.el
@@ -497,12 +497,13 @@ inside double-quotes"
 
 (ert-deftest esh-var-test/alias/function ()
   "Test using a variable alias defined as a function."
-  (with-temp-eshell
-   (push `("ALIAS" ,(lambda () "value") nil t) eshell-variable-aliases-list)
-   (eshell-match-command-output "echo $ALIAS" "value\n")
-   (eshell-match-command-output "set ALIAS hello"
-                                "Variable `ALIAS' is not settable\n"
-                                nil t)))
+  (let ((text-quoting-style 'grave))
+    (with-temp-eshell
+     (push `("ALIAS" ,(lambda () "value") nil t) eshell-variable-aliases-list)
+     (eshell-match-command-output "echo $ALIAS" "value\n")
+     (eshell-match-command-output "set ALIAS hello"
+                                  "Variable `ALIAS' is not settable\n"
+                                  nil t))))
 
 (ert-deftest esh-var-test/alias/function-pair ()
   "Test using a variable alias defined as a pair of getter/setter functions."
@@ -558,12 +559,13 @@ This should get/set the value bound to the symbol."
 This should get the value bound to the symbol, but fail to set
 it, since the setter is nil."
   (with-temp-eshell
-   (let ((eshell-test-value "value"))
+   (let ((eshell-test-value "value")
+         (text-quoting-style 'grave))
      (push '("ALIAS" (eshell-test-value . nil)) eshell-variable-aliases-list)
      (eshell-match-command-output "echo $ALIAS" "value\n")
      (eshell-match-command-output "set ALIAS hello"
-                                "Variable `ALIAS' is not settable\n"
-                                nil t))))
+                                  "Variable `ALIAS' is not settable\n"
+                                  nil t))))
 
 (ert-deftest esh-var-test/alias/export ()
   "Test that `export' properly sets variable aliases."