From 132ffdae1add622c8a3c6065d7730a8fe8ea5e78 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sun, 5 Sep 2021 22:52:26 -0400 Subject: Changed the syntax of do/be's (co)monad bindings. --- stdlib/source/program/aedifex/dependency/resolution.lux | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'stdlib/source/program/aedifex/dependency/resolution.lux') diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux index 99e8b9adf..b8aead0aa 100644 --- a/stdlib/source/program/aedifex/dependency/resolution.lux +++ b/stdlib/source/program/aedifex/dependency/resolution.lux @@ -84,7 +84,7 @@ [?actual (\ repository download (///repository/remote.uri version_template artifact extension))] (case ?actual (#try.Success actual) - (in (do {! try.monad} + (in (do [! try.monad] [output (\ ! each (for {@.old (|>> (:as java/lang/String) java/lang/String::trim (:as Text)) @@ -186,7 +186,7 @@ (\ async.monad in)) (#.Item repository alternatives) - (do {! async.monad} + (do [! async.monad] [_ (..announce_fetching console repository (value@ #//.artifact dependency)) outcome (..one repository dependency)] (case outcome @@ -223,7 +223,7 @@ failures tail resolution) - _ (do {! async.monad} + _ (do [! async.monad] [?package (case (dictionary.value head resolution) (#.Some package) (in (#try.Success package)) -- cgit v1.2.3