From 8f575da5095e3b259d4eb6b6f13d3e37ef1d38e4 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 11 Jun 2021 02:48:13 -0400
Subject: Added import name formatting to "import:" macros for other backends.

---
 stdlib/source/program/aedifex/dependency/deployment.lux | 5 +++--
 stdlib/source/program/aedifex/dependency/resolution.lux | 7 ++++---
 2 files changed, 7 insertions(+), 5 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/dependency/deployment.lux b/stdlib/source/program/aedifex/dependency/deployment.lux
index 04b82d7e2..963602494 100644
--- a/stdlib/source/program/aedifex/dependency/deployment.lux
+++ b/stdlib/source/program/aedifex/dependency/deployment.lux
@@ -14,7 +14,8 @@
     ["." product]
     [text
      ["%" format (#+ format)]
-     ["." encoding]]
+     [encoding
+      ["." utf8]]]
     [collection
      ["." dictionary]
      ["." set (#+ Set)]
@@ -54,7 +55,7 @@
                        (function (_ codec extension hash)
                          (|> hash
                              (\ codec encode)
-                             (\ encoding.utf8 encode)
+                             (\ utf8.codec encode)
                              (\ repository upload (format artifact extension)))))]
     (do {! (try.with promise.monad)}
       [_ (\ repository upload artifact data)]
diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux
index 1d72f0937..89ad6368f 100644
--- a/stdlib/source/program/aedifex/dependency/resolution.lux
+++ b/stdlib/source/program/aedifex/dependency/resolution.lux
@@ -19,7 +19,8 @@
     ["." maybe]
     ["." text
      ["%" format (#+ format)]
-     ["." encoding]]
+     [encoding
+      ["." utf8]]]
     [format
      ["." xml (#+ Tag XML)]]
     [collection
@@ -81,7 +82,7 @@
               [output (\ ! map (|>> (:coerce java/lang/String)
                                     java/lang/String::trim
                                     (:coerce Text))
-                         (\ encoding.utf8 decode actual))
+                         (\ utf8.codec decode actual))
                actual (|> output
                           (text.split_all_with " ")
                           list.head
@@ -131,7 +132,7 @@
        library_&_status (..hashed repository version_template artifact extension)]
       (\ promise.monad wrap
          (do try.monad
-           [pom (\ encoding.utf8 decode pom_data)
+           [pom (\ utf8.codec decode pom_data)
             pom (\ xml.codec decode pom)
             profile (<xml>.run ///pom.parser (list pom))]
            (wrap {#///package.origin (#///repository/origin.Remote "")
-- 
cgit v1.2.3