From 68b1dd82f23d6648ac3d9075a8f84b0174392945 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Thu, 17 Dec 2020 22:03:54 -0400
Subject: More optimizations to the Lux syntax parser.

---
 stdlib/source/program/aedifex/dependency/resolution.lux | 6 +++---
 1 file changed, 3 insertions(+), 3 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 e8b0f2dba..2131495b9 100644
--- a/stdlib/source/program/aedifex/dependency/resolution.lux
+++ b/stdlib/source/program/aedifex/dependency/resolution.lux
@@ -58,7 +58,7 @@
         (Exception [Dependency Text])
         (Promise (Try (///hash.Hash h)))))
   (do (try.with promise.monad)
-    [actual (\ repository download artifact extension)]
+    [actual (\ repository download (///repository.uri artifact extension))]
     (\ promise.monad wrap
        (do try.monad
          [output (\ encoding.utf8 decode actual)
@@ -72,14 +72,14 @@
   (let [[artifact type] dependency
         extension (///artifact/extension.extension type)]
     (do (try.with promise.monad)
-      [library (\ repository download artifact extension)
+      [library (\ repository download (///repository.uri artifact extension))
        sha-1 (..verified-hash dependency library
                               repository artifact ///artifact/extension.sha-1
                               ///hash.sha-1 ///hash.sha-1-codec ..sha-1-does-not-match)
        md5 (..verified-hash dependency library
                             repository artifact ///artifact/extension.md5
                             ///hash.md5 ///hash.md5-codec ..md5-does-not-match)
-       pom (\ repository download artifact ///artifact/extension.pom)]
+       pom (\ repository download (///repository.uri artifact ///artifact/extension.pom))]
       (\ promise.monad wrap
          (do try.monad
            [pom (\ encoding.utf8 decode pom)
-- 
cgit v1.2.3