diff options
Diffstat (limited to 'stdlib/source/program/aedifex/command/test.lux')
| -rw-r--r-- | stdlib/source/program/aedifex/command/test.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux index fa3d55d1d..0c6c03db9 100644 --- a/stdlib/source/program/aedifex/command/test.lux +++ b/stdlib/source/program/aedifex/command/test.lux @@ -38,9 +38,9 @@ (-> (Console Async) (Program Async) (file.System Async) (Shell Async) Resolution (Command [Exit Any])) (do async.monad [environment (program.environment async.monad program) - .let [working_directory (# program directory)]] + .let [working_directory (at program directory)]] (do [! ///action.monad] - [.let [home (# program home)] + [.let [home (at program home)] [build_exit compiler program] (//build.do! console program fs shell resolution (has ///.#program (the ///.#test profile) profile))] (if (i.= shell.normal build_exit) @@ -62,13 +62,13 @@ [//build.#Python ///.#python] [//build.#Lua ///.#lua] [//build.#Ruby ///.#ruby]))] - process (# shell execute [(dictionary.composite environment command_environment) - working_directory - test_command - test_parameters]) + process (at shell execute [(dictionary.composite environment command_environment) + working_directory + test_command + test_parameters]) _ (//build.log_output! console process) _ (//build.log_error! console process) - exit (# process await []) + exit (at process await []) _ (is (Async (Try Any)) (console.write_line (if (i.= shell.normal exit) ..success |