From bf53ee92fc3c33a4885aa227e55d24f7ba3cb2c4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 16 Mar 2022 08:37:23 -0400
Subject: De-sigil-ification: prefix :

---
 stdlib/source/test/aedifex/command/test.lux | 40 ++++++++++++++---------------
 1 file changed, 20 insertions(+), 20 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/command/test.lux b/stdlib/source/test/aedifex/command/test.lux
index e992f87bc..4f6cfcdc4 100644
--- a/stdlib/source/test/aedifex/command/test.lux
+++ b/stdlib/source/test/aedifex/command/test.lux
@@ -47,12 +47,12 @@
          target (random.ascii/alpha 5)
          home (random.ascii/alpha 5)
          working_directory (random.ascii/alpha 5)
-         .let [empty_profile (: Profile
-                                (# ///.monoid identity))
-               with_target (: (-> Profile Profile)
-                              (has ///.#target target))
-               with_test (: (-> Profile Profile)
-                            (has ///.#test {.#Some test}))
+         .let [empty_profile (is Profile
+                                 (# ///.monoid identity))
+               with_target (is (-> Profile Profile)
+                               (has ///.#target target))
+               with_test (is (-> Profile Profile)
+                             (has ///.#test {.#Some test}))
                
                profile (|> empty_profile
                            with_test
@@ -84,20 +84,20 @@
                                [.let [bad_shell (shell.mock
                                                  (function (_ [actual_environment actual_working_directory actual_command actual_arguments])
                                                    {try.#Success
-                                                    (: (shell.Mock [])
-                                                       (implementation
-                                                        (def: (on_read state)
-                                                          (exception.except shell.no_more_output []))
-                                                        (def: (on_error state)
-                                                          (exception.except shell.no_more_output []))
-                                                        (def: (on_write input state)
-                                                          {try.#Failure "on_write"})
-                                                        (def: (on_destroy state)
-                                                          {try.#Failure "on_destroy"})
-                                                        (def: (on_await state)
-                                                          {try.#Success [state (if (list.any? (text#= "build") actual_arguments)
-                                                                                 shell.normal
-                                                                                 shell.error)]})))})
+                                                    (is (shell.Mock [])
+                                                        (implementation
+                                                         (def: (on_read state)
+                                                           (exception.except shell.no_more_output []))
+                                                         (def: (on_error state)
+                                                           (exception.except shell.no_more_output []))
+                                                         (def: (on_write input state)
+                                                           {try.#Failure "on_write"})
+                                                         (def: (on_destroy state)
+                                                           {try.#Failure "on_destroy"})
+                                                         (def: (on_await state)
+                                                           {try.#Success [state (if (list.any? (text#= "build") actual_arguments)
+                                                                                  shell.normal
+                                                                                  shell.error)]})))})
                                                  [])]
                                 _ (/.do! console (program.async (program.mock environment.empty home working_directory))
                                          fs (shell.async bad_shell) resolution
-- 
cgit v1.2.3