procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fix new Eshell tests on MS-Windows

Browse source 
* test/lisp/eshell/eshell-tests.el (eshell-test/eshell-command/background)
(eshell-test/eshell-command/background-pipeline): Allow for ".exe"
in the program's name.  This fixes these tests on MS-Windows.
This commit is contained in:
Eli Zaretskii 2023-04-01 09:24:38 +03:00
parent e2ebf3995d
commit 21a4ee209c
1 changed files with 2 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
test/lisp/eshell/eshell-tests.el
View file

@ -137,7 +137,7 @@ This test uses a pipeline for the command."
(eshell-command "*echo hi &") (eshell-command "*echo hi &")
(with-current-buffer "*Eshell Async Command Output*" (with-current-buffer "*Eshell Async Command Output*"
(goto-char (point-min)) (goto-char (point-min))
(should (looking-at "\\[echo\\(<[0-9]+>\\)?\\]")))))) (should (looking-at "\\[echo\\(\\.exe\\)?\\(<[0-9]+>\\)?\\]"))))))
(ert-deftest eshell-test/eshell-command/background-pipeline () (ert-deftest eshell-test/eshell-command/background-pipeline ()
"Test that `eshell-command' works for background commands. "Test that `eshell-command' works for background commands.
@ -150,7 +150,7 @@ This test uses a pipeline for the command."
(eshell-command "*echo hi | *cat &") (eshell-command "*echo hi | *cat &")
(with-current-buffer "*Eshell Async Command Output*" (with-current-buffer "*Eshell Async Command Output*"
(goto-char (point-min)) (goto-char (point-min))
(should (looking-at "\\[cat\\(<[0-9]+>\\)?\\]")))))) (should (looking-at "\\[cat\\(\\.exe\\)\\(<[0-9]+>\\)?\\]"))))))
(ert-deftest eshell-test/command-running-p () (ert-deftest eshell-test/command-running-p ()
"Modeline should show no command running" "Modeline should show no command running"