From f9e33ae96aec4741385a576719786092c9e68043 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 4 Jun 2022 19:34:42 -0400
Subject: De-sigil-ification: #

---
 stdlib/source/program/aedifex/repository/local.lux | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

(limited to 'stdlib/source/program/aedifex/repository/local.lux')

diff --git a/stdlib/source/program/aedifex/repository/local.lux b/stdlib/source/program/aedifex/repository/local.lux
index e712e1db1..6f031ccfd 100644
--- a/stdlib/source/program/aedifex/repository/local.lux
+++ b/stdlib/source/program/aedifex/repository/local.lux
@@ -22,10 +22,10 @@
 
 (def: .public (root program fs)
   (-> (Program Async) (file.System Async) file.Path)
-  (let [/ (# fs separator)]
+  (let [/ (at fs separator)]
     (|> ///local.repository
         (text.replaced uri.separator /)
-        (format (# program home) /))))
+        (format (at program home) /))))
 
 (def: (path /)
   (-> Text (-> URI file.Path))
@@ -33,7 +33,7 @@
 
 (def: (absolute_path program fs)
   (-> (Program Async) (file.System Async) (-> URI file.Path))
-  (let [/ (# fs separator)]
+  (let [/ (at fs separator)]
     (|>> ///metadata.local_uri
          (..path /)
          (format (..root program fs) /))))
@@ -46,12 +46,12 @@
 
   (def: download
     (|>> (..absolute_path program fs)
-         (# fs read)))
+         (at fs read)))
 
   (def: (upload uri content)
     (do [! async.monad]
       [.let [absolute_path (..absolute_path program fs uri)]
-       ? (# fs file? absolute_path)
+       ? (at fs file? absolute_path)
        _ (is (Async (Try Any))
              (if ?
                (in {try.#Success []})
@@ -61,4 +61,4 @@
 
                  _
                  (in {try.#Success []}))))]
-      (# fs write absolute_path content))))
+      (at fs write absolute_path content))))
-- 
cgit v1.2.3