diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-07-12 07:44:47 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-12 07:44:47 -0700 |
commit | 98b120646119c0bcb689b4e2f61e6beeb085522f (patch) | |
tree | edfbaa37770c4c24b7682885e08c2c1e5dc33aaf | |
parent | 11a85798634e92af2730faeddcd29d080345bd1c (diff) | |
download | txr-98b120646119c0bcb689b4e2f61e6beeb085522f.tar.gz txr-98b120646119c0bcb689b4e2f61e6beeb085522f.tar.bz2 txr-98b120646119c0bcb689b4e2f61e6beeb085522f.zip |
tests: weaken condition in path search for sh.
* tests/018/path-test.tl: In the Guix build environment, the
shell might be found at a path not ending in bin. Let's
ust test for ending in /bin. Reported and investigated by
Paul A. Patience.
-rw-r--r-- | tests/018/path-test.tl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/tests/018/path-test.tl b/tests/018/path-test.tl index 0fbc5115..75a8d2d3 100644 --- a/tests/018/path-test.tl +++ b/tests/018/path-test.tl @@ -1,7 +1,7 @@ (load "../common") (mtest - (ends-with "/bin/sh" (path-search "sh")) t + (ends-with "/sh" (path-search "sh")) t (path-search "AlMoStCeRtAiNlLyNoNeXisTenT") nil (path-search "") nil (path-search "sh" nil) nil |