From 4610968193df10af12c91f699fec39aeb3ef703a Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 10 Jul 2021 03:10:43 -0400
Subject: Made the "try" macro into a common one, instead of a host-specific
 one.

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

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

diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux
index 63c3e930d..2cbb469ab 100644
--- a/stdlib/source/program/aedifex/dependency/resolution.lux
+++ b/stdlib/source/program/aedifex/dependency/resolution.lux
@@ -196,8 +196,8 @@
           [_ (..announce_failure console repository (get@ #//.artifact dependency))]
           (any console alternatives dependency))))))
 
-(def: #export (all console repositories dependencies resolution)
-  (-> (Console Promise) (List (Repository Promise)) (List Dependency) Resolution
+(def: #export (all console repositories new_repository dependencies resolution)
+  (-> (Console Promise) (List (Repository Promise)) (-> URL (Repository Promise)) (List Dependency) Resolution
       (Promise [(List Dependency)
                 (List Dependency)
                 Resolution]))
@@ -237,8 +237,7 @@
                                             ///package.repositories
                                             (try\map set.to_list)
                                             (try.default (list))
-                                            (list\map (|>> (///repository/remote.repository http.default #.None)
-                                                           ///repository.async))
+                                            (list\map new_repository)
                                             (list\compose repositories))]
                  [successes failures resolution] (recur sub_repositories
                                                         (#.Cons head successes)
-- 
cgit v1.2.3