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: #

---
 .../source/program/aedifex/metadata/snapshot.lux   | 30 +++++++++++-----------
 1 file changed, 15 insertions(+), 15 deletions(-)

(limited to 'stdlib/source/program/aedifex/metadata/snapshot.lux')

diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index eb2f48c76..caf25a787 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -95,16 +95,16 @@
                                                          ///artifact/snapshot/version.#value version
                                                          ///artifact/snapshot/version.#updated ///artifact/time.epoch]]
                       (|> (<xml>.somewhere ///artifact/versioning.parser)
-                          (# ! each
-                             (revised ///artifact/versioning.#versions
-                                      (is (-> (List ///artifact/snapshot/version.Version)
-                                              (List ///artifact/snapshot/version.Version))
-                                          (|>> (pipe.case
-                                                 (pattern (list))
-                                                 (list <default_version>)
+                          (at ! each
+                              (revised ///artifact/versioning.#versions
+                                       (is (-> (List ///artifact/snapshot/version.Version)
+                                               (List ///artifact/snapshot/version.Version))
+                                           (|>> (pipe.case
+                                                  (pattern (list))
+                                                  (list <default_version>)
 
-                                                 versions
-                                                 versions)))))
+                                                  versions
+                                                  versions)))))
                           (<>.else [///artifact/versioning.#snapshot {///artifact/snapshot.#Local}
                                     ///artifact/versioning.#last_updated ///artifact/time.epoch
                                     ///artifact/versioning.#versions (list <default_version>)])))]
@@ -127,13 +127,13 @@
 (def: .public (read repository artifact)
   (-> (Repository Async) Artifact (Async (Try Metadata)))
   (do async.monad
-    [project (# repository download (..uri artifact))]
+    [project (at repository download (..uri artifact))]
     (case project
       {try.#Success project}
       (in (|> project
               (pipe.do try.monad
-                [(# utf8.codec decoded)]
-                [(# xml.codec decoded)]
+                [(at utf8.codec decoded)]
+                [(at xml.codec decoded)]
                 [list (<xml>.result ..parser)])))
       
       {try.#Failure error}
@@ -145,6 +145,6 @@
   (-> (Repository Async) Artifact Metadata (Async (Try Any)))
   (|> metadata
       ..format
-      (# xml.codec encoded)
-      (# utf8.codec encoded)
-      (# repository upload (..uri artifact))))
+      (at xml.codec encoded)
+      (at utf8.codec encoded)
+      (at repository upload (..uri artifact))))
-- 
cgit v1.2.3