aboutsummaryrefslogtreecommitdiff
path: root/licentia/source/program/licentia.lux
diff options
context:
space:
mode:
authorEduardo Julian2022-03-16 08:37:23 -0400
committerEduardo Julian2022-03-16 08:37:23 -0400
commitbf53ee92fc3c33a4885aa227e55d24f7ba3cb2c4 (patch)
tree49683a62ae8e110c62b42a9a6386bb2ddb3c47c6 /licentia/source/program/licentia.lux
parentd710d9f4fc098e7c243c8a5f23cd42683f13e07f (diff)
De-sigil-ification: prefix :
Diffstat (limited to 'licentia/source/program/licentia.lux')
-rw-r--r--licentia/source/program/licentia.lux24
1 files changed, 12 insertions, 12 deletions
diff --git a/licentia/source/program/licentia.lux b/licentia/source/program/licentia.lux
index 74d072067..7576f739a 100644
--- a/licentia/source/program/licentia.lux
+++ b/licentia/source/program/licentia.lux
@@ -63,18 +63,18 @@
(<cli>.named "--output")
<cli>.any)]
(do io.monad
- [?done (: (IO (Try Any))
- (do (try.with io.monad)
- [blob (# file.default read input)
- document (io#wrap (do [! try.monad]
- [raw_json (# utf8.codec decoded blob)
- json (|> raw_json
- java/lang/String::trim
- (# json.codec decoded))]
- (|> json
- (<json>.result /input.license)
- (# ! each /output.license))))]
- (# file.default write (# utf8.codec encoded document) output)))]
+ [?done (is (IO (Try Any))
+ (do (try.with io.monad)
+ [blob (# file.default read input)
+ document (io#wrap (do [! try.monad]
+ [raw_json (# utf8.codec decoded blob)
+ json (|> raw_json
+ java/lang/String::trim
+ (# json.codec decoded))]
+ (|> json
+ (<json>.result /input.license)
+ (# ! each /output.license))))]
+ (# file.default write (# utf8.codec encoded document) output)))]
(wrap (debug.log! (case ?done
{try.#Success _}
(success_message output)