From 21a4ee209c19031e29e98e4308aa9d67890a0515 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Sat, 1 Apr 2023 09:24:38 +0300 Subject: [PATCH] Fix new Eshell tests on MS-Windows * 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. --- test/lisp/eshell/eshell-tests.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/lisp/eshell/eshell-tests.el b/test/lisp/eshell/eshell-tests.el index b57abe3226c..8c049cb342d 100644 --- a/test/lisp/eshell/eshell-tests.el +++ b/test/lisp/eshell/eshell-tests.el @@ -137,7 +137,7 @@ This test uses a pipeline for the command." (eshell-command "*echo hi &") (with-current-buffer "*Eshell Async Command Output*" (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 () "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 &") (with-current-buffer "*Eshell Async Command Output*" (goto-char (point-min)) - (should (looking-at "\\[cat\\(<[0-9]+>\\)?\\]")))))) + (should (looking-at "\\[cat\\(\\.exe\\)\\(<[0-9]+>\\)?\\]")))))) (ert-deftest eshell-test/command-running-p () "Modeline should show no command running" -- 2.39.2