Re-named the directory for my bookmarks to better reflect what they are.

1 files changed, 8 insertions, 6 deletions

diff --git a/stdlib/source/program/compositor/export.lux b/stdlib/source/program/compositor/export.lux
index 468b1ef9d..00bdf6f19 100644
--- a/stdlib/source/program/compositor/export.lux
+++ b/stdlib/source/program/compositor/export.lux
@@ -62,9 +62,11 @@
 
 (def: #export (export system [sources target])
   (-> (file.System Promise) Export (Promise (Try Any)))
-  (let [package (format target (:: system separator) ..file)]
-    (do (try.with promise.monad)
-      [tar (..library system sources)
-       package (: (Promise (Try (file.File Promise)))
-                  (file.get-file promise.monad system package))]
-      (!.use (:: package over-write) (binary.run tar.writer tar)))))
+  (do (try.with promise.monad)
+    [tar (..library system sources)
+     package (: (Promise (Try (file.File Promise)))
+                (file.get-file promise.monad system
+                               (format target (:: system separator) ..file)))]
+    (|> tar
+        (binary.run tar.writer)
+        (!.use (:: package over-write)))))