aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program')
-rw-r--r--stdlib/source/program/licentia.lux2
-rw-r--r--stdlib/source/program/scriptum.lux2
2 files changed, 2 insertions, 2 deletions
diff --git a/stdlib/source/program/licentia.lux b/stdlib/source/program/licentia.lux
index 3300c380d..46fa8345f 100644
--- a/stdlib/source/program/licentia.lux
+++ b/stdlib/source/program/licentia.lux
@@ -55,7 +55,7 @@
(cli.named "--output" cli.any))}]
(do io.monad
[?done (: (IO (Error Any))
- (do (error.with-error io.monad)
+ (do (error.with io.monad)
[file (!.use (:: file.system file) input)
blob (!.use (:: file content) [])
document (io/wrap (do error.monad
diff --git a/stdlib/source/program/scriptum.lux b/stdlib/source/program/scriptum.lux
index 04570a9bb..a51a1765b 100644
--- a/stdlib/source/program/scriptum.lux
+++ b/stdlib/source/program/scriptum.lux
@@ -483,7 +483,7 @@
(-> [Text (Markdown Block)] (IO Any))
(let [path (format (text.replace-all "/" "_" module-name) ".md")]
(do io.monad
- [outcome (do (error.with-error io.monad)
+ [outcome (do (error.with io.monad)
[target (: (IO (Error (File IO)))
(file.get-file io.monad file.system path))]
(!.use (:: target over-write) (encoding.to-utf8 (md.markdown documentation))))]