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/program/aedifex/command/test.lux | 15 ++++++---------
 1 file changed, 6 insertions(+), 9 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux
index f3ab6c12a..e8b5a2a23 100644
--- a/stdlib/source/program/aedifex/command/test.lux
+++ b/stdlib/source/program/aedifex/command/test.lux
@@ -4,9 +4,7 @@
     [monad (#+ do)]]
    [control
     [concurrency
-     ["." promise (#+ Promise) ("#\." monad)]]
-    [security
-     ["!" capability]]]
+     ["." promise (#+ Promise) ("#\." monad)]]]
    [data
     [text
      ["%" format (#+ format)]]]
@@ -44,14 +42,13 @@
        #let [[compiler_command compiler_parameters] (case compiler
                                                       (#//build.JVM artifact) (///runtime.java program)
                                                       (#//build.JS artifact) (///runtime.node program))]
-       process (!.use (\ shell execute)
-                      [environment
-                       working_directory
-                       compiler_command
-                       compiler_parameters])
+       process (\ shell execute [environment
+                                 working_directory
+                                 compiler_command
+                                 compiler_parameters])
        _ (//build.log_output! console process)
        _ (//build.log_error! console process)
-       exit (!.use (\ process await) [])
+       exit (\ process await [])
        _ (console.write_line (if (i.= shell.normal exit)
                                ..success
                                ..failure)
-- 
cgit v1.2.3