diff options
| author | Eduardo Julian | 2019-02-24 21:30:10 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2019-02-24 21:30:10 -0400 |
| commit | 2ae7dc30bf91d709a6038871e9c967dafb15cf49 (patch) | |
| tree | e8643c571c640b6f4b81723f95a6573f6b87c01b /stdlib/source/program | |
| parent | a72e34d30eaf3557f9b76ced9605a95759ce8eca (diff) | |
Improved the names of monad transformers.
Diffstat (limited to '')
| -rw-r--r-- | stdlib/source/program/licentia.lux | 2 | ||||
| -rw-r--r-- | stdlib/source/program/scriptum.lux | 2 |
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))))] |