From 061fd8a209bbcaffc2bfb850ac6046752a567d50 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 27 Jul 2021 03:51:10 -0400
Subject: Re-named wrap => in && unwrap => out.

---
 stdlib/source/program/aedifex/pom.lux | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/pom.lux b/stdlib/source/program/aedifex/pom.lux
index b458c7a21..145d65f6e 100644
--- a/stdlib/source/program/aedifex/pom.lux
+++ b/stdlib/source/program/aedifex/pom.lux
@@ -152,7 +152,7 @@
                   )))
 
     _
-    (exception.throw /.no_identity [])))
+    (exception.except /.no_identity [])))
 
 (def: property_parser
   (Parser [Tag Text])
@@ -173,16 +173,16 @@
         (do maybe.monad
           [group (dictionary.get ["" ..group_tag] properties)
            artifact (dictionary.get ["" ..artifact_tag] properties)]
-          (wrap {#//dependency.artifact {#//artifact.group group
-                                         #//artifact.name artifact
-                                         #//artifact.version (|> properties
-                                                                 (dictionary.get ["" ..version_tag])
-                                                                 (maybe.default "")
-                                                                 (text.replace_all "${project.version}" own_version)
-                                                                 (text.replace_all "${project.parent.version}" parent_version))}
-                 #//dependency.type (|> properties
-                                        (dictionary.get ["" "type"])
-                                        (maybe.default //artifact/type.jvm_library))})))))
+          (in {#//dependency.artifact {#//artifact.group group
+                                       #//artifact.name artifact
+                                       #//artifact.version (|> properties
+                                                               (dictionary.get ["" ..version_tag])
+                                                               (maybe.default "")
+                                                               (text.replace_all "${project.version}" own_version)
+                                                               (text.replace_all "${project.parent.version}" parent_version))}
+               #//dependency.type (|> properties
+                                      (dictionary.get ["" "type"])
+                                      (maybe.default //artifact/type.jvm_library))})))))
 
 (def: (dependencies_parser own_version parent_version)
   (-> Text Text (Parser (List Dependency)))
@@ -224,8 +224,8 @@
                             <xml>.somewhere
                             (<>.default (list)))
            _ (<>.some <xml>.ignore)]
-          (wrap (|> (\ /.monoid identity)
-                    (update@ #/.dependencies (function (_ empty)
-                                               (list\fold set.add empty dependencies)))
-                    (update@ #/.repositories (function (_ empty)
-                                               (list\fold set.add empty repositories)))))))))
+          (in (|> (\ /.monoid identity)
+                  (update@ #/.dependencies (function (_ empty)
+                                             (list\fold set.add empty dependencies)))
+                  (update@ #/.repositories (function (_ empty)
+                                             (list\fold set.add empty repositories)))))))))
-- 
cgit v1.2.3