diff options
| -rw-r--r-- | test/lisp/eshell/esh-var-tests.el | 20 |
1 files changed, 11 insertions, 9 deletions
diff --git a/test/lisp/eshell/esh-var-tests.el b/test/lisp/eshell/esh-var-tests.el index d9b2585a327..245a8e6a26b 100644 --- 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." |