From 0d909187d5b9effcd08f533d50af7d29c0d6bfd8 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 8 Apr 2022 05:42:36 -0400
Subject: De-sigil-ification: $

---
 .../source/program/aedifex/metadata/artifact.lux   | 36 +++++++++++-----------
 1 file changed, 18 insertions(+), 18 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux
index b5aef41de..285e1c980 100644
--- a/stdlib/source/program/aedifex/metadata/artifact.lux
+++ b/stdlib/source/program/aedifex/metadata/artifact.lux
@@ -145,27 +145,27 @@
 (def: .public parser
   (Parser Metadata)
   (<| (<xml>.node ..<metadata>)
-      ($_ <>.and
-          (<xml>.somewhere (..text ..<group>))
-          (<xml>.somewhere (..text ..<name>))
-          (<| (<xml>.node ..<versioning>)
-              ... Handle any ignorable tag.
-              (<>.before (<>.some <xml>.any))
-              ($_ <>.and
-                  (<| <xml>.somewhere
-                      (<xml>.node ..<versions>)
-                      (<>.many (..text ..<version>)))
-                  (<xml>.somewhere ..last_updated_parser)
-                  )))))
+      (all <>.and
+           (<xml>.somewhere (..text ..<group>))
+           (<xml>.somewhere (..text ..<name>))
+           (<| (<xml>.node ..<versioning>)
+               ... Handle any ignorable tag.
+               (<>.before (<>.some <xml>.any))
+               (all <>.and
+                    (<| <xml>.somewhere
+                        (<xml>.node ..<versions>)
+                        (<>.many (..text ..<version>)))
+                    (<xml>.somewhere ..last_updated_parser)
+                    )))))
 
 (def: .public equivalence
   (Equivalence Metadata)
-  ($_ product.equivalence
-      text.equivalence
-      text.equivalence
-      (list.equivalence text.equivalence)
-      instant.equivalence
-      ))
+  (all product.equivalence
+       text.equivalence
+       text.equivalence
+       (list.equivalence text.equivalence)
+       instant.equivalence
+       ))
 
 (def: .public uri
   (-> Artifact URI)
-- 
cgit v1.2.3