aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/compositor/export.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/compositor/export.lux')
-rw-r--r--stdlib/source/program/compositor/export.lux10
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)))))