From 71ade9a07f08c0d61ebd70e64c2745f1ba33cb54 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 12 Dec 2020 01:40:48 -0400
Subject: Removed several unnecessary imports.

---
 stdlib/source/program/aedifex/metadata.lux | 31 +++++++++++++++++++++++++++++-
 1 file changed, 30 insertions(+), 1 deletion(-)

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

diff --git a/stdlib/source/program/aedifex/metadata.lux b/stdlib/source/program/aedifex/metadata.lux
index 0eca976c0..937fea4a3 100644
--- a/stdlib/source/program/aedifex/metadata.lux
+++ b/stdlib/source/program/aedifex/metadata.lux
@@ -1,8 +1,37 @@
 (.module:
   [lux #*
+   [data
+    ["." text
+     ["%" format (#+ format)]]]
    [world
-    [file (#+ Path)]]])
+    [file (#+ Path)]
+    [net
+     ["." uri (#+ URI)]]]]
+  ["." //
+   ["." artifact (#+ Artifact)]])
 
 (def: #export file
   Path
   "maven-metadata.xml")
+
+(def: (project separator artifact)
+  (-> Text Artifact Text)
+  (format (artifact.directory separator (get@ #artifact.group artifact))
+          separator
+          (get@ #artifact.name artifact)))
+
+(def: (version separator artifact)
+  (-> Text Artifact Text)
+  (format (..project separator artifact)
+          separator
+          (get@ #artifact.version artifact)))
+
+(template [<public> <private>]
+  [(def: #export (<public> artifact)
+     (-> Artifact URI)
+     (let [/ uri.separator]
+       (format (<private> / artifact) / ..file)))]
+
+  [for-project ..project]
+  [for-version ..version]
+  )
-- 
cgit v1.2.3