diff options
author | Eduardo Julian | 2021-08-24 05:23:45 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-08-24 05:23:45 -0400 |
commit | 36303d6cb2ce3ab9e36d045b9516c997bd461862 (patch) | |
tree | b9d2f1495143054d61d9af129f36833624db9dac /stdlib/source/program/aedifex.lux | |
parent | ec1f31b5a1492d5e0ab260397291d4449483bbd9 (diff) |
Outsourced the syntax for labelled type definitions to macros.
Diffstat (limited to 'stdlib/source/program/aedifex.lux')
-rw-r--r-- | stdlib/source/program/aedifex.lux | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/program/aedifex.lux b/stdlib/source/program/aedifex.lux index 4dd110551..0637d36b8 100644 --- a/stdlib/source/program/aedifex.lux +++ b/stdlib/source/program/aedifex.lux @@ -68,7 +68,7 @@ (-> /.Profile (List (Repository Async))) (|>> (value@ #/.repositories) set.list - (list\map (|>> (/repository/remote.repository http.default #.None) /repository.async)))) + (list\each (|>> (/repository/remote.repository http.default #.None) /repository.async)))) (def: (with_dependencies program console command profile) (All [a] @@ -127,7 +127,7 @@ (program: [[profile operation] /cli.command] (do {! io.monad} [?console console.default] - (case (try\map console.async ?console) + (case (try\each console.async ?console) (#try.Failure error) (..fail! error) |