diff options
| author | Eli Zaretskii <eliz@gnu.org> | 2022-08-13 09:58:44 +0300 |
|---|---|---|
| committer | Eli Zaretskii <eliz@gnu.org> | 2022-08-13 09:58:44 +0300 |
| commit | 6de88b6b0261a549637270c0474998ac76eb65a9 (patch) | |
| tree | ce56c1624fa6b4c6e1b437a5923f8cdd296f2726 /test | |
| parent | f3408af0a3251a744cb0b55b5e153565bfd57ea3 (diff) | |
| download | emacs-6de88b6b0261a549637270c0474998ac76eb65a9.tar.gz emacs-6de88b6b0261a549637270c0474998ac76eb65a9.tar.bz2 emacs-6de88b6b0261a549637270c0474998ac76eb65a9.zip | |
Fix a recently-added Eshell test on MS-Windows
* test/lisp/eshell/esh-var-tests.el
(esh-var-test/last-result-var-ext-cmd): Fix the test on
MS-Windows by making sure the internal 'format' command
is invoked. (Bug#57129)
Diffstat (limited to 'test')
| -rw-r--r-- | test/lisp/eshell/esh-var-tests.el | 11 |
1 files changed, 7 insertions, 4 deletions
diff --git a/test/lisp/eshell/esh-var-tests.el b/test/lisp/eshell/esh-var-tests.el index 66dabd424bd..0c094ee5a79 100644 --- a/test/lisp/eshell/esh-var-tests.el +++ b/test/lisp/eshell/esh-var-tests.el @@ -561,10 +561,13 @@ This tests when `eshell-lisp-form-nil-is-failure' is nil." "Test using the \"last result\" ($$) variable with an external command" (skip-unless (executable-find "[")) (with-temp-eshell - (eshell-command-result-p "[ foo = foo ]; format \"%s\" $$" - "t\n") - (eshell-command-result-p "[ foo = bar ]; format \"%s\" $$" - "nil\n"))) + ;; MS-DOS/MS-Windows have an external command 'format', which we + ;; don't want here. + (let ((eshell-prefer-lisp-functions t)) + (eshell-command-result-p "[ foo = foo ]; format \"%s\" $$" + "t\n") + (eshell-command-result-p "[ foo = bar ]; format \"%s\" $$" + "nil\n")))) (ert-deftest esh-var-test/last-result-var-split-indices () "Test using the \"last result\" ($$) variable with split indices" |