From d29e091e98dabb8dfcf816899ada480ecbf7e357 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 23 Dec 2020 06:33:44 -0400
Subject: Refactored "export" common syntax.

---
 stdlib/source/program/aedifex.lux | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

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

diff --git a/stdlib/source/program/aedifex.lux b/stdlib/source/program/aedifex.lux
index cfa106407..4e78183f1 100644
--- a/stdlib/source/program/aedifex.lux
+++ b/stdlib/source/program/aedifex.lux
@@ -63,7 +63,7 @@
   (-> /.Profile (List (Repository Promise)))
   (|>> (get@ #/.repositories)
        set.to-list
-       (list\map (|>> /repository.remote /repository.async))))
+       (list\map (|>> (/repository.remote #.None) /repository.async))))
 
 (def: (with-dependencies program console command profile)
   (All [a]
@@ -149,9 +149,8 @@
                         (dictionary.get repository (get@ #/.deploy-repositories profile))]
                    [(#.Some artifact) (#.Some repository)]
                    (/command/deploy.do! console
-                                        (/repository.async (/repository.remote repository))
+                                        (/repository.async (/repository.remote (#.Some identity) repository))
                                         (file.async file.default)
-                                        identity
                                         artifact
                                         profile)
 
-- 
cgit v1.2.3