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/repository.lux | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'stdlib/source/program/aedifex/repository.lux')

diff --git a/stdlib/source/program/aedifex/repository.lux b/stdlib/source/program/aedifex/repository.lux
index 50a473b82..04eb87356 100644
--- a/stdlib/source/program/aedifex/repository.lux
+++ b/stdlib/source/program/aedifex/repository.lux
@@ -54,7 +54,7 @@
      
      (def: (download uri)
        (stm.commit!
-        (do {! stm.monad}
+        (do [! stm.monad]
           [|state| (stm.read state)]
           (case (\ mock on_download uri |state|)
             (#try.Success [|state| output])
@@ -67,7 +67,7 @@
 
      (def: (upload uri content)
        (stm.commit!
-        (do {! stm.monad}
+        (do [! stm.monad]
           [|state| (stm.read state)]
           (case (\ mock on_upload uri content |state|)
             (#try.Success |state|)
-- 
cgit v1.2.3