From 5cf4efa861075f8276f43a2516f5beacaf610b44 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 2 Jul 2021 03:11:36 -0400
Subject: No longer employing the capabilities model on the lux/world/*
 modules.

Capabilities should be opt-in, but using them in the standard library makes them mandatory.---
 stdlib/source/test/aedifex/command/clean.lux | 8 +++-----
 1 file changed, 3 insertions(+), 5 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 705cca7f2..18997e02e 100644
--- a/stdlib/source/test/aedifex/command/clean.lux
+++ b/stdlib/source/test/aedifex/command/clean.lux
@@ -6,9 +6,7 @@
    [control
     ["." try (#+ Try)]
     [concurrency
-     ["." promise (#+ Promise)]]
-    [security
-     ["!" capability]]]
+     ["." promise (#+ Promise)]]]
    [data
     [binary (#+ Binary)]
     ["." product]
@@ -55,7 +53,7 @@
   (do {! (try.with promise.monad)}
     [file (: (Promise (Try (File Promise)))
              (file.get_file promise.monad fs path))]
-    (!.use (\ file over_write) content)))
+    (\ file over_write content)))
 
 (def: (create_directory! fs path files)
   (-> (file.System Promise) Path (List [Path Binary]) (Promise (Try Any)))
@@ -111,7 +109,7 @@
                             context_exists!/post (..directory_exists? fs context)
                             target_exists!/post (..assets_exist? fs target_path direct_files)
                             sub_exists!/post (..assets_exist? fs sub_path sub_files)
-                            logging (!.use (\ console read_line) [])]
+                            logging (\ console read_line [])]
                            (wrap (and (and context_exists!/pre
                                            context_exists!/post)
                                       (and target_exists!/pre
-- 
cgit v1.2.3