diff options
author | Eduardo Julian | 2021-07-02 03:11:36 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-07-02 03:11:36 -0400 |
commit | 5cf4efa861075f8276f43a2516f5beacaf610b44 (patch) | |
tree | e21cf528d960c29d22cbc7e41180fa09e62f16d6 /stdlib/source/program/aedifex/input.lux | |
parent | 744ee69630de59ca3ba660b0aab6361cd17ce1b4 (diff) |
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.
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/program/aedifex/input.lux | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/stdlib/source/program/aedifex/input.lux b/stdlib/source/program/aedifex/input.lux index b00829469..2e7dbbab6 100644 --- a/stdlib/source/program/aedifex/input.lux +++ b/stdlib/source/program/aedifex/input.lux @@ -6,9 +6,7 @@ [pipe (#+ do>)] ["." try (#+ Try)] [parser - ["<c>" code]] - [security - ["!" capability]]] + ["<.>" code]]] [data [binary (#+ Binary)] ["." text @@ -46,13 +44,13 @@ (|>> (do> try.monad [(\ utf8.codec decode)] [..parse_lux] - [(list) (<c>.run //parser.project)]))) + [(list) (<code>.run //parser.project)]))) (def: #export (read monad fs profile) (All [!] (-> (Monad !) (file.System !) Text (! (Try Profile)))) (do (try.with monad) - [project_file (!.use (\ fs file) //project.file) - project_file (!.use (\ project_file content) [])] + [project_file (\ fs file //project.file) + project_file (\ project_file content [])] (\ monad wrap (|> project_file (do> try.monad |