diff options
Diffstat (limited to 'licentia/source/program/licentia.lux')
| -rw-r--r-- | licentia/source/program/licentia.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/licentia/source/program/licentia.lux b/licentia/source/program/licentia.lux index aaa392ec3..518922e7c 100644 --- a/licentia/source/program/licentia.lux +++ b/licentia/source/program/licentia.lux @@ -65,16 +65,16 @@ (do io.monad [?done (is (IO (Try Any)) (do (try.with io.monad) - [blob (# file.default read input) + [blob (at file.default read input) document (io#wrap (do [! try.monad] - [raw_json (# utf8.codec decoded blob) + [raw_json (at utf8.codec decoded blob) json (|> raw_json java/lang/String::trim - (# json.codec decoded))] + (at json.codec decoded))] (|> json (<json>.result /input.license) - (# ! each /output.license))))] - (# file.default write (# utf8.codec encoded document) output)))] + (at ! each /output.license))))] + (at file.default write (at utf8.codec encoded document) output)))] (wrap (debug.log! (case ?done {try.#Success _} (success_message output) |