From 17e7566be51df5e428a6b10e6469201a8a9468da Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 7 Aug 2021 02:20:09 -0400
Subject: Made the be/de macros for (co)monadic expression extensible.

---
 stdlib/source/test/aedifex/command/deploy.lux | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

(limited to 'stdlib/source/test/aedifex/command/deploy.lux')

diff --git a/stdlib/source/test/aedifex/command/deploy.lux b/stdlib/source/test/aedifex/command/deploy.lux
index b34584b19..d315c646c 100644
--- a/stdlib/source/test/aedifex/command/deploy.lux
+++ b/stdlib/source/test/aedifex/command/deploy.lux
@@ -54,7 +54,7 @@
       Artifact ///.Profile
       (Async (Try Text)))
   (do ///action.monad
-    [#let [console ($version.echo "")]
+    [.let [console ($version.echo "")]
      _ ($install.make_sources! fs (get@ #///.sources profile))
      _ (/.do! console repository fs artifact profile)]
     (\ console read_line [])))
@@ -73,7 +73,7 @@
          
          home (random.ascii/alpha 5)
          working_directory (random.ascii/alpha 5)
-         #let [repository (///repository.mock $repository.mock
+         .let [repository (///repository.mock $repository.mock
                                               $repository.empty)
                fs (file.mock (\ file.default separator))
                program (program.async (program.mock environment.empty home working_directory))]]
@@ -82,7 +82,7 @@
                          [logging (..execute! program repository fs artifact profile)
                           expected_library (|> profile
                                                (get@ #///.sources)
-                                               set.to_list
+                                               set.list
                                                (export.library fs)
                                                (\ ! map (format.run tar.writer)))
 
@@ -99,7 +99,7 @@
                                           [actual_md5 (\ utf8.codec decode actual_md5)]
                                           (\ ///hash.md5_codec decode actual_md5)))
 
-                          #let [succeeded!
+                          .let [succeeded!
                                 (text\= /.success logging)
 
                                 deployed_library!
-- 
cgit v1.2.3