From bc36487224f670c23002cc4575c0dba3e5dc1be1 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 15 Mar 2022 07:24:35 -0400
Subject: De-sigil-ification: ^

---
 stdlib/source/program/aedifex/metadata/artifact.lux | 4 ++--
 stdlib/source/program/aedifex/metadata/snapshot.lux | 6 +++---
 2 files changed, 5 insertions(+), 5 deletions(-)

(limited to 'stdlib/source/program/aedifex/metadata')

diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux
index 7a2957ae0..b5aef41de 100644
--- a/stdlib/source/program/aedifex/metadata/artifact.lux
+++ b/stdlib/source/program/aedifex/metadata/artifact.lux
@@ -59,7 +59,7 @@
 
 (def: (time_format value)
   (%.Format Time)
-  (let [(^open "[0]") (time.clock value)]
+  (let [(open "[0]") (time.clock value)]
     (%.format (..pad #hour)
               (..pad #minute)
               (..pad #second))))
@@ -189,7 +189,7 @@
       
       {try.#Failure error}
       (in {try.#Success
-           (let [(^open "[0]") artifact]
+           (let [(open "[0]") artifact]
              [..#group #group
               ..#name #name
               ..#versions (list)
diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index 83ba59279..cc41be0b5 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -69,9 +69,9 @@
   [version_format Version ..<version> (|>)]
   )
 
-(def: .public (format (^open "/[0]"))
+(def: .public (format (open "/[0]"))
   (-> Metadata XML)
-  (let [(^open "//[0]") /#artifact]
+  (let [(open "//[0]") /#artifact]
     {xml.#Node ..<metadata>
                xml.attributes
                (list (..group_format //#group)
@@ -100,7 +100,7 @@
                                       (: (-> (List ///artifact/snapshot/version.Version)
                                              (List ///artifact/snapshot/version.Version))
                                          (|>> (pipe.case
-                                                (^ (list))
+                                                (pattern (list))
                                                 (list <default_version>)
 
                                                 versions
-- 
cgit v1.2.3