From 36303d6cb2ce3ab9e36d045b9516c997bd461862 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 24 Aug 2021 05:23:45 -0400
Subject: Outsourced the syntax for labelled type definitions to macros.

---
 stdlib/source/program/aedifex/dependency/resolution.lux | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux
index 50415b61f..8de6d2423 100644
--- a/stdlib/source/program/aedifex/dependency/resolution.lux
+++ b/stdlib/source/program/aedifex/dependency/resolution.lux
@@ -84,10 +84,10 @@
     (case ?actual
       (#try.Success actual)
       (in (do {! try.monad}
-            [output (\ ! map (for {@.old (|>> (:as java/lang/String)
-                                              java/lang/String::trim
-                                              (:as Text))
-                                   @.jvm (|>> java/lang/String::trim)})
+            [output (\ ! each (for {@.old (|>> (:as java/lang/String)
+                                               java/lang/String::trim
+                                               (:as Text))
+                                    @.jvm (|>> java/lang/String::trim)})
                        (\ utf8.codec decoded actual))
              actual (|> output
                         (text.all_split_by " ")
@@ -234,15 +234,15 @@
               (do !
                 [.let [sub_dependencies (|> package
                                             ///package.dependencies
-                                            (try\map set.list)
+                                            (try\each set.list)
                                             (try.else (list)))
                        ... For security reasons, it's not a good idea to allow dependencies to introduce repositories.
                        ... package_repositories (|> package
                        ...                          ///package.repositories
-                       ...                          (try\map set.list)
+                       ...                          (try\each set.list)
                        ...                          (try.else (list))
-                       ...                          (list\map new_repository))
-                       ... sub_repositories (list\compose repositories package_repositories)
+                       ...                          (list\each new_repository))
+                       ... sub_repositories (list\composite repositories package_repositories)
                        sub_repositories repositories]
                  [successes failures resolution] (recur sub_repositories
                                                         (#.Item head successes)
-- 
cgit v1.2.3