diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2021-07-04 03:16:54 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2021-07-04 03:16:54 -0700 |
| commit | 992117767d6a798f27aeb8a39be673b4d2ac24dc (patch) | |
| tree | f62cf3fee50272e7e79850e2edf63694fb80e5dd | |
| parent | eebbc95f98ac3b530050d8eb1cc76994437bddd9 (diff) | |
| download | txr-992117767d6a798f27aeb8a39be673b4d2ac24dc.tar.gz txr-992117767d6a798f27aeb8a39be673b4d2ac24dc.tar.bz2 txr-992117767d6a798f27aeb8a39be673b4d2ac24dc.zip | |
path-search: fix test for sh not being in /bin.
* tests/018/path-test.tl: Check that the result of a path-search for
"sh" only ends in "/bin/sh", not that it is precisely "/bin/sh".
| -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 2b4e1717..0fbc5115 100644 --- a/tests/018/path-test.tl +++ b/tests/018/path-test.tl @@ -1,7 +1,7 @@ (load "../common") (mtest - (path-search "sh") "/bin/sh" + (ends-with "/bin/sh" (path-search "sh")) t (path-search "AlMoStCeRtAiNlLyNoNeXisTenT") nil (path-search "") nil (path-search "sh" nil) nil |