From 2dbbaaec93a53f8dd0b96a0028b9cf125c9066cd Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 12 Sep 2021 15:39:55 -0400
Subject: Re-named \ => # && \\ => ##

---
 stdlib/source/program/compositor/export.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'stdlib/source/program/compositor/export.lux')

diff --git a/stdlib/source/program/compositor/export.lux b/stdlib/source/program/compositor/export.lux
index 90234875a..117c52251 100644
--- a/stdlib/source/program/compositor/export.lux
+++ b/stdlib/source/program/compositor/export.lux
@@ -48,7 +48,7 @@
                     (function (_ [path source_code])
                       (do try.monad
                         [path (|> path
-                                  (text.replaced (\ fs separator) .module_separator)
+                                  (text.replaced (# fs separator) .module_separator)
                                   tar.path)
                          source_code (tar.content source_code)]
                         (in {tar.#Normal [path
@@ -59,14 +59,14 @@
                                               tar.read_by_other)
                                           ..no_ownership
                                           source_code]}))))
-        (\ try.monad each row.of_list)
-        (\ async.monad in))))
+        (# try.monad each row.of_list)
+        (# async.monad in))))
 
 (def: .public (export fs [sources target])
   (-> (file.System Async) Export (Async (Try Any)))
   (do [! (try.with async.monad)]
-    [tar (\ ! each (binary.result tar.writer)
+    [tar (# ! each (binary.result tar.writer)
             (..library fs sources))]
     (|> ..file
-        (format target (\ fs separator))
-        (\ fs write tar))))
+        (format target (# fs separator))
+        (# fs write tar))))
-- 
cgit v1.2.3