De-sigil-ification: ^

3 files changed, 48 insertions, 48 deletions

diff --git a/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux b/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux
index d84234cb5..f17f27680 100644
--- a/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux
+++ b/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux
@@ -1,20 +1,20 @@
 (.using
-  [library
-   [lux "*"
-    [abstract
-     [equivalence {"+" Equivalence}]
-     [monad {"+" do}]]
-    [control
-     ["<>" parser
-      ["<[0]>" xml {"+" Parser}]
-      ["<[0]>" text]]]
-    [data
-     ["[0]" product]
-     [format
-      ["[0]" xml {"+" XML}]]]]]
-  ["[0]" // "_"
-   ["[1][0]" time {"+" Time}]
-   ["[1][0]" build {"+" Build}]])
+ [library
+  [lux "*"
+   [abstract
+    [equivalence {"+" Equivalence}]
+    [monad {"+" do}]]
+   [control
+    ["<>" parser
+     ["<[0]>" xml {"+" Parser}]
+     ["<[0]>" text]]]
+   [data
+    ["[0]" product]
+    [format
+     ["[0]" xml {"+" XML}]]]]]
+ ["[0]" // "_"
+  ["[1][0]" time {"+" Time}]
+  ["[1][0]" build {"+" Build}]])
 
 (type: .public Stamp
   (Record
@@ -39,7 +39,7 @@
        list
        {xml.#Node ..<timestamp> xml.attributes}))
 
-(def: .public (format (^open "_[0]"))
+(def: .public (format (open "_[0]"))
   (-> Stamp (List XML))
   (list (..time_format _#time)
         (//build.format _#build)))
diff --git a/stdlib/source/program/aedifex/artifact/snapshot/version.lux b/stdlib/source/program/aedifex/artifact/snapshot/version.lux
index d23e166c8..66923459c 100644
--- a/stdlib/source/program/aedifex/artifact/snapshot/version.lux
+++ b/stdlib/source/program/aedifex/artifact/snapshot/version.lux
@@ -1,21 +1,21 @@
 (.using
-  [library
-   [lux {"-" Type}
-    [abstract
-     [equivalence {"+" Equivalence}]
-     [monad {"+" do}]]
-    [control
-     ["<>" parser
-      ["<[0]>" xml {"+" Parser}]
-      ["<[0]>" text]]]
-    [data
-     ["[0]" product]
-     ["[0]" text]
-     [format
-      ["[0]" xml {"+" XML}]]]]]
-  ["[0]" /// "_"
-   ["[1][0]" type {"+" Type}]
-   ["[1][0]" time {"+" Time}]])
+ [library
+  [lux {"-" Type}
+   [abstract
+    [equivalence {"+" Equivalence}]
+    [monad {"+" do}]]
+   [control
+    ["<>" parser
+     ["<[0]>" xml {"+" Parser}]
+     ["<[0]>" text]]]
+   [data
+    ["[0]" product]
+    ["[0]" text]
+    [format
+     ["[0]" xml {"+" XML}]]]]]
+ ["[0]" /// "_"
+  ["[1][0]" type {"+" Type}]
+  ["[1][0]" time {"+" Time}]])
 
 (type: .public Version
   (Record
@@ -45,7 +45,7 @@
   (-> xml.Tag Text XML)
   (|> value {xml.#Text} list {xml.#Node tag xml.attributes}))
 
-(def: .public (format (^open "_[0]"))
+(def: .public (format (open "_[0]"))
   (-> Version XML)
   (<| {xml.#Node ..<snapshot_version> xml.attributes}
       (list (..text_format ..<extension> _#extension)
diff --git a/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux
index f01c01522..65d30acdf 100644
--- a/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux
+++ b/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux
@@ -1,15 +1,15 @@
 (.using
-  [library
-   [lux "*"
-    [abstract
-     [equivalence {"+" Equivalence}]]
-    [data
-     ["[0]" product]
-     ["[0]" text
-      ["%" format]]]]]
-  ["[0]" /// {"+" Snapshot}
-   ["[1][0]" time]
-   ["[1][0]" stamp]])
+ [library
+  [lux "*"
+   [abstract
+    [equivalence {"+" Equivalence}]]
+   [data
+    ["[0]" product]
+    ["[0]" text
+     ["%" format]]]]]
+ ["[0]" /// {"+" Snapshot}
+  ["[1][0]" time]
+  ["[1][0]" stamp]])
 
 (type: .public Value
   (Record
@@ -29,14 +29,14 @@
 (def: .public snapshot
   "SNAPSHOT")
 
-(def: .public (format (^open "/[0]"))
+(def: .public (format (open "/[0]"))
   (%.Format Value)
   (case /#snapshot
     {///.#Local}
     /#version
     
     {///.#Remote stamp}
-    (let [(^open "/[0]") stamp]
+    (let [(open "/[0]") stamp]
       (%.format (text.replaced ..snapshot
                                (///time.format /#time)
                                /#version)