From 9e2f1e76f2c8df01ed7687d934c3210fcf676bd6 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 16 Jun 2022 00:48:19 -0400
Subject: De-sigil-ification: suffix : [Part 13]

---
 stdlib/source/test/aedifex/command/clean.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 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 4f37c7bc3..7edf91440 100644
--- a/stdlib/source/test/aedifex/command/clean.lux
+++ b/stdlib/source/test/aedifex/command/clean.lux
@@ -36,11 +36,11 @@
     ["[1]" profile]
     ["[1][0]" action (.only Action)]]]])
 
-(def: node_name
+(def node_name
   (Random Text)
   (random.alphabetic 10))
 
-(def: (files prefix)
+(def (files prefix)
   (-> Path (Random (List [Path Binary])))
   (do [! random.monad]
     [count (at ! each (n.% 10) random.nat)
@@ -49,11 +49,11 @@
     (in (list.zipped_2 (list#each (|>> (format prefix)) (set.list names))
                        contents))))
 
-(def: (create_file! fs [path content])
+(def (create_file! fs [path content])
   (-> (file.System Async) [Path Binary] (Async (Try Any)))
   (at fs write path content))
 
-(def: (create_directory! fs path files)
+(def (create_directory! fs path files)
   (-> (file.System Async) Path (List [Path Binary]) (Async (Try Any)))
   (do [! (try.with async.monad)]
     [_ (is (Async (Try Any))
@@ -61,15 +61,15 @@
      _ (monad.each ! (..create_file! fs) files)]
     (in [])))
 
-(def: (directory_exists? fs)
+(def (directory_exists? fs)
   (-> (file.System Async) Path (Async (Try Bit)))
   (|>> (at fs directory?) (try.lifted async.monad)))
 
-(def: (file_exists? fs)
+(def (file_exists? fs)
   (-> (file.System Async) Path (Async (Try Bit)))
   (|>> (at fs file?) (try.lifted async.monad)))
 
-(def: (assets_exist? fs directory_path files)
+(def (assets_exist? fs directory_path files)
   (-> (file.System Async) Path (List [Path Binary]) (Async (Try Bit)))
   (do [! (try.with async.monad)]
     [directory_exists? (..directory_exists? fs directory_path)
@@ -80,7 +80,7 @@
     (in (and directory_exists?
              (list.every? (|>>) files_exist?)))))
 
-(def: .public test
+(def .public test
   Test
   (<| (_.covering /._)
       (do [! random.monad]
-- 
cgit v1.2.3