diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/aedifex/runtime.lux | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux index 17b3428d2..0143eaac8 100644 --- a/stdlib/source/test/aedifex/runtime.lux +++ b/stdlib/source/test/aedifex/runtime.lux @@ -18,8 +18,9 @@ (`` ($_ _.and (~~ (template [<command>] [(_.cover [<command>] - (let [command (<command> path)] - (and (text.starts_with? (<command> "") command) + (let [command (text.join_with " " (#.Cons (<command> path))) + pure_command (text.join_with " " (#.Cons (<command> "")))] + (and (text.starts_with? pure_command command) (text.ends_with? path command))))] [/.java] |