aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/licentia.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/licentia.lux')
-rw-r--r--stdlib/source/program/licentia.lux4
1 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/program/licentia.lux b/stdlib/source/program/licentia.lux
index 7eab5b444..244e28223 100644
--- a/stdlib/source/program/licentia.lux
+++ b/stdlib/source/program/licentia.lux
@@ -57,7 +57,7 @@
(do io.monad
[?done (: (IO (Try Any))
(do (try.with io.monad)
- [file (!.use (:: file.system file) input)
+ [file (!.use (:: file.default file) input)
blob (!.use (:: file content) [])
document (io;wrap (do try.monad
[raw-json (encoding.from-utf8 blob)
@@ -69,7 +69,7 @@
license (json.run json /input.license)]
(wrap (/output.license license))))
output-file (: (IO (Try (File IO)))
- (file.get-file io.monad file.system output))]
+ (file.get-file io.monad file.default output))]
(!.use (:: output-file over-write) (encoding.to-utf8 document))))]
(case ?done
(#try.Success _)