From f27a91a7b67790272578692ea20e2d875dbb3d35 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 23 Feb 2022 05:30:53 -0400
Subject: ADDED Can pass config parameters to compiler and select code based on
 it. Can also select code based on compiler version.

---
 .../source/program/aedifex/repository/remote.lux   | 61 +++++++++++-----------
 1 file changed, 30 insertions(+), 31 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/repository/remote.lux b/stdlib/source/program/aedifex/repository/remote.lux
index 9e50e71a6..7f1a735b8 100644
--- a/stdlib/source/program/aedifex/repository/remote.lux
+++ b/stdlib/source/program/aedifex/repository/remote.lux
@@ -1,34 +1,33 @@
 (.using
-  [library
-   [lux "*"
-    [abstract
-     [monad {"+" do}]]
-    [control
-     ["[0]" io {"+" IO}]
-     ["[0]" try {"+" Try}]
-     ["[0]" exception {"+" exception:}]]
-    [data
-     ["[0]" product]
-     [text
-      ["%" format {"+" format}]]]
-    [tool
-     [compiler
-      ["[0]" version]
-      ["[0]" language "_"
-       ["[1]/[0]" lux "_"
-        ["[1]" version]]]]]
-    [world
-     [net {"+" URL}
-      [uri {"+" URI}]
-      ["[0]" http "_"
-       ["[1]" client]
-       ["[1]/[0]" status]
-       ["@[1]" /]]]]]]
-  ["[0]" //
-   ["[1][0]" identity {"+" Identity}]
-   ["/[1]" // "_"
-    ["[1][0]" artifact {"+" Version Artifact}
-     [extension {"+" Extension}]]]])
+ [library
+  [lux "*"
+   [abstract
+    [monad {"+" do}]]
+   [control
+    ["[0]" io {"+" IO}]
+    ["[0]" try {"+" Try}]
+    ["[0]" exception {"+" exception:}]]
+   [data
+    ["[0]" product]
+    [text
+     ["%" format {"+" format}]]]
+   ["[0]" meta "_"
+    ["[1]/[0]" version]]
+   [tool
+    [compiler
+     ["[0]" version]]]
+   [world
+    [net {"+" URL}
+     [uri {"+" URI}]
+     ["[0]" http "_"
+      ["[1]" client]
+      ["[1]/[0]" status]
+      ["@[1]" /]]]]]]
+ ["[0]" //
+  ["[1][0]" identity {"+" Identity}]
+  ["/[1]" // "_"
+   ["[1][0]" artifact {"+" Version Artifact}
+    [extension {"+" Extension}]]]])
 
 (type: .public Address
   URL)
@@ -49,7 +48,7 @@
   (format (///artifact.uri version_template artifact) extension))
 
 (def: .public user_agent
-  (format "LuxAedifex/" (version.format language/lux.version)))
+  (format "LuxAedifex/" (version.format meta/version.latest)))
 
 (def: base_headers
   (List [Text Text])
-- 
cgit v1.2.3