diff options
Diffstat (limited to 'stdlib/source/test/aedifex/cli.lux')
| -rw-r--r-- | stdlib/source/test/aedifex/cli.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/aedifex/cli.lux b/stdlib/source/test/aedifex/cli.lux index 9cc571bbe..fe15d204e 100644 --- a/stdlib/source/test/aedifex/cli.lux +++ b/stdlib/source/test/aedifex/cli.lux @@ -78,8 +78,8 @@ (cli.result /.command) (pipe.case {try.#Success [names actual]} - (and (# (list.equivalence text.equivalence) = (list //.default) names) - (# /.equivalence = expected actual)) + (and (at (list.equivalence text.equivalence) = (list //.default) names) + (at /.equivalence = expected actual)) {try.#Failure error} false))))) @@ -96,8 +96,8 @@ (cli.result /.command) (pipe.case {try.#Success [actual_profile actual_command]} - (and (# (list.equivalence text.equivalence) = (list expected_profile //.default) actual_profile) - (# /.equivalence = expected_command actual_command)) + (and (at (list.equivalence text.equivalence) = (list expected_profile //.default) actual_profile) + (at /.equivalence = expected_command actual_command)) {try.#Failure error} false))))) |