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/test/aedifex/command/install.lux | 24 ++++++++++++------------
 1 file changed, 12 insertions(+), 12 deletions(-)

(limited to 'stdlib/source/test/aedifex/command/install.lux')

diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux
index 0461029fc..ba6f599fb 100644
--- a/stdlib/source/test/aedifex/command/install.lux
+++ b/stdlib/source/test/aedifex/command/install.lux
@@ -5,7 +5,7 @@
     [abstract
      ["[0]" monad {"+" [do]}]]
     [control
-     ["[0]" try {"+" [Try]} ("[1]\[0]" functor)]
+     ["[0]" try {"+" [Try]} ("[1]#[0]" functor)]
      ["[0]" exception]
      [concurrency
       ["[0]" async {"+" [Async]}]]
@@ -13,7 +13,7 @@
       ["[0]" environment]]]
     [data
      ["[0]" binary]
-     ["[0]" text ("[1]\[0]" equivalence)
+     ["[0]" text ("[1]#[0]" equivalence)
       ["%" format {"+" [format]}]]
      [collection
       ["[0]" set {"+" [Set]}]]]
@@ -41,7 +41,7 @@
 
 (def: .public (make_sources! fs sources)
   (-> (file.System Async) (Set file.Path) (Action (List Any)))
-  (let [/ (\ fs separator)
+  (let [/ (# fs separator)
         ! ///action.monad]
     (|> sources
         set.list
@@ -58,18 +58,18 @@
     [.let [console ($version.echo "")]
      _ (..make_sources! fs (value@ ///.#sources sample))
      _ (/.do! console fs (///repository/local.repository program fs) sample)]
-    (\ console read_line [])))
+    (# console read_line [])))
 
 (def: .public test
   Test
   (<| (_.covering /._)
       (do [! random.monad]
         [identity $artifact.random
-         sample (\ ! each (with@ ///.#identity {.#Some identity})
+         sample (# ! each (with@ ///.#identity {.#Some identity})
                    $profile.random)
          home (random.ascii/alpha 5)
          working_directory (random.ascii/alpha 5)
-         .let [/ (\ file.default separator)]]
+         .let [/ (# file.default separator)]]
         ($_ _.and
             (in (do [! async.monad]
                   [.let [fs (file.mock /)
@@ -79,16 +79,16 @@
                          library_path (format artifact_path ///artifact/extension.lux_library)
                          pom_path (format artifact_path ///artifact/extension.pom)]
                    verdict (do [! ///action.monad]
-                             [succeeded! (\ ! each (text\= /.success)
+                             [succeeded! (# ! each (text#= /.success)
                                             (..execute! program fs sample))
                               library_exists! (|> library_path
                                                   (format home /)
-                                                  (\ fs file?)
-                                                  (\ async.monad each (|>> {try.#Success})))
+                                                  (# fs file?)
+                                                  (# async.monad each (|>> {try.#Success})))
                               pom_exists! (|> pom_path
                                               (format home /)
-                                              (\ fs file?)
-                                              (\ async.monad each (|>> {try.#Success})))]
+                                              (# fs file?)
+                                              (# async.monad each (|>> {try.#Success})))]
                              (in (and succeeded!
                                       library_exists!
                                       pom_exists!)))]
@@ -100,6 +100,6 @@
                    logging (..execute! program fs (with@ ///.#identity {.#None} sample))]
                   (_.cover' [/.failure]
                             (|> logging
-                                (try\each (text\= /.failure))
+                                (try#each (text#= /.failure))
                                 (try.else false)))))
             ))))
-- 
cgit v1.2.3