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/compositor/export.lux | 6 ++----
 stdlib/source/program/compositor/import.lux | 6 ++----
 2 files changed, 4 insertions(+), 8 deletions(-)

(limited to 'stdlib/source/program/compositor')

diff --git a/stdlib/source/program/compositor/export.lux b/stdlib/source/program/compositor/export.lux
index 2c764aff9..238034534 100644
--- a/stdlib/source/program/compositor/export.lux
+++ b/stdlib/source/program/compositor/export.lux
@@ -5,9 +5,7 @@
    [control
     ["." try (#+ Try)]
     [concurrency
-     ["." promise (#+ Promise)]]
-    [security
-     ["!" capability]]]
+     ["." promise (#+ Promise)]]]
    [data
     ["." text
      ["%" format (#+ format)]]
@@ -72,4 +70,4 @@
                                (format target (\ system separator) ..file)))]
     (|> tar
         (binary.run tar.writer)
-        (!.use (\ package over_write)))))
+        (\ package over_write))))
diff --git a/stdlib/source/program/compositor/import.lux b/stdlib/source/program/compositor/import.lux
index 7b4a9262e..19a2d7607 100644
--- a/stdlib/source/program/compositor/import.lux
+++ b/stdlib/source/program/compositor/import.lux
@@ -7,8 +7,6 @@
     ["." exception (#+ exception:)]
     [concurrency
      ["." promise (#+ Promise) ("#\." monad)]]
-    [security
-     ["!" capability]]
     ["<>" parser
      ["<b>" binary]]]
    [data
@@ -47,8 +45,8 @@
   (-> (file.System Promise) Library Import (Action Import))
   (do (try.with promise.monad)
     [file (: (Action (File Promise))
-             (!.use (\ system file) [library]))
-     binary (!.use (\ file content) [])]
+             (\ system file library))
+     binary (\ file content [])]
     (promise\wrap
      (do {! try.monad}
        [tar (<b>.run tar.parser binary)]
-- 
cgit v1.2.3