No longer employing the capabilities model on the lux/world/* modules.

Capabilities should be opt-in, but using them in the standard library makes them mandatory.

1 files changed, 23 insertions, 1 deletions

diff --git a/stdlib/source/program/aedifex/metadata.lux b/stdlib/source/program/aedifex/metadata.lux
index 08dab9ed3..86981eb62 100644
--- a/stdlib/source/program/aedifex/metadata.lux
+++ b/stdlib/source/program/aedifex/metadata.lux
@@ -1,12 +1,34 @@
 (.module:
   [lux #*
+   [data
+    [text
+     ["%" format (#+ format)]]]
    [world
-    [file (#+ Path)]]])
+    [file (#+ Path)]
+    [net
+     ["." uri (#+ URI)]]]]
+  ["." // #_
+   ["#." artifact (#+ Artifact)]])
 
 (def: #export remote_file
   Path
   "maven-metadata.xml")
 
+(def: #export (remote_artifact_uri artifact)
+  (-> Artifact URI)
+  (let [/ uri.separator]
+    (format (get@ #//artifact.group artifact)
+            / (get@ #//artifact.name artifact)
+            / (get@ #//artifact.version artifact)
+            / ..remote_file)))
+
+(def: #export (remote_project_uri artifact)
+  (-> Artifact URI)
+  (let [/ uri.separator]
+    (format (get@ #//artifact.group artifact)
+            / (get@ #//artifact.name artifact)
+            / ..remote_file)))
+
 (def: #export local_file
   Path
   "maven-metadata-local.xml")