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/clean.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

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

diff --git a/stdlib/source/test/aedifex/command/clean.lux b/stdlib/source/test/aedifex/command/clean.lux
index 6a2210f1b..21372ef80 100644
--- a/stdlib/source/test/aedifex/command/clean.lux
+++ b/stdlib/source/test/aedifex/command/clean.lux
@@ -56,8 +56,8 @@
 (def: (create_directory! fs path files)
   (-> (file.System Async) Path (List [Path Binary]) (Async (Try Any)))
   (do [! (try.with async.monad)]
-    [_ (: (Async (Try Any))
-          (file.make_directories async.monad fs path))
+    [_ (is (Async (Try Any))
+           (file.make_directories async.monad fs path))
      _ (monad.each ! (..create_file! fs) files)]
     (in [])))
 
@@ -73,10 +73,10 @@
   (-> (file.System Async) Path (List [Path Binary]) (Async (Try Bit)))
   (do [! (try.with async.monad)]
     [directory_exists? (..directory_exists? fs directory_path)
-     files_exist? (: (Action (List Bit))
-                     (|> files
-                         (list#each product.left)
-                         (monad.each ///action.monad (..file_exists? fs))))]
+     files_exist? (is (Action (List Bit))
+                      (|> files
+                          (list#each product.left)
+                          (monad.each ///action.monad (..file_exists? fs))))]
     (in (and directory_exists?
              (list.every? (|>>) files_exist?)))))
 
-- 
cgit v1.2.3