diff options
Diffstat (limited to 'stdlib/source/program/compositor/export.lux')
| -rw-r--r-- | stdlib/source/program/compositor/export.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/program/compositor/export.lux b/stdlib/source/program/compositor/export.lux index b1e525098..bc2ced5a3 100644 --- a/stdlib/source/program/compositor/export.lux +++ b/stdlib/source/program/compositor/export.lux @@ -49,7 +49,7 @@ (function (_ [path source-code]) (do try.monad [path (|> path - (text.replace-all (:: system separator) .module-separator) + (text.replace-all (\ system separator) .module-separator) tar.path) source-code (tar.content source-code)] (wrap (#tar.Normal [path @@ -57,8 +57,8 @@ tar.none ..no-ownership source-code]))))) - (:: try.monad map row.from-list) - (:: promise.monad wrap)))) + (\ try.monad map row.from-list) + (\ promise.monad wrap)))) (def: #export (export system [sources target]) (-> (file.System Promise) Export (Promise (Try Any))) @@ -66,7 +66,7 @@ [tar (..library system sources) package (: (Promise (Try (file.File Promise))) (file.get-file promise.monad system - (format target (:: system separator) ..file)))] + (format target (\ system separator) ..file)))] (|> tar (binary.run tar.writer) - (!.use (:: package over-write))))) + (!.use (\ package over-write))))) |