From 2b909032e7a0bd10cd7db52067d2fb701bfa95e5 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Tue, 6 Jul 2021 21:34:21 -0400
Subject: Simplified the API for file-system operations.

---
 stdlib/source/program/aedifex/metadata/artifact.lux |  7 ++-----
 stdlib/source/program/aedifex/metadata/snapshot.lux | 10 ++--------
 2 files changed, 4 insertions(+), 13 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux
index 9210534cc..7150efbab 100644
--- a/stdlib/source/program/aedifex/metadata/artifact.lux
+++ b/stdlib/source/program/aedifex/metadata/artifact.lux
@@ -169,12 +169,9 @@
       instant.equivalence
       ))
 
-(def: #export (uri artifact)
+(def: #export uri
   (-> Artifact URI)
-  (let [/ uri.separator
-        group (///artifact.directory / (get@ #///artifact.group artifact))
-        name (get@ #///artifact.name artifact)]
-    (%.format group / name / //.remote_file)))
+  //.remote_project_uri)
 
 (def: epoch
   Instant
diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index c8feaa3d9..6eec0c32c 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -117,15 +117,9 @@
       ///artifact/versioning.equivalence
       ))
 
-(def: #export (uri artifact)
+(def: #export uri
   (-> Artifact URI)
-  (let [/ uri.separator
-        group (|> artifact
-                  (get@ #///artifact.group)
-                  (///artifact.directory /))
-        name (get@ #///artifact.name artifact)
-        version (get@ #///artifact.version artifact)]
-    (%.format group / name / version / //.remote_file)))
+  //.remote_artifact_uri)
 
 (def: #export (read repository artifact)
   (-> (Repository Promise) Artifact (Promise (Try Metadata)))
-- 
cgit v1.2.3