From f621a133e6e0a516c0586270fea8eaffb4829d82 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sun, 8 Aug 2021 17:56:15 -0400
Subject: No more #export magic syntax.

---
 stdlib/source/program/aedifex/repository/identity.lux | 10 +++++-----
 stdlib/source/program/aedifex/repository/local.lux    |  2 +-
 stdlib/source/program/aedifex/repository/origin.lux   |  4 ++--
 stdlib/source/program/aedifex/repository/remote.lux   | 10 +++++-----
 4 files changed, 13 insertions(+), 13 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/repository/identity.lux b/stdlib/source/program/aedifex/repository/identity.lux
index dccecf291..742c1aef2 100644
--- a/stdlib/source/program/aedifex/repository/identity.lux
+++ b/stdlib/source/program/aedifex/repository/identity.lux
@@ -11,17 +11,17 @@
       [encoding
        ["." utf8]]]]]])
 
-(type: #export User
+(type: .public User
   Text)
 
-(type: #export Password
+(type: .public Password
   Text)
 
-(type: #export Identity
+(type: .public Identity
   {#user User
    #password Password})
 
-(def: #export equivalence
+(def: .public equivalence
   (Equivalence Identity)
   ($_ product.equivalence
       text.equivalence
@@ -36,7 +36,7 @@
   ["#::."
    (#static getEncoder [] java/util/Base64$Encoder)])
 
-(def: #export (basic_auth user password)
+(def: .public (basic_auth user password)
   (-> User Password Text)
   (let [credentials (\ utf8.codec encode (format user ":" password))]
     (|> (java/util/Base64::getEncoder)
diff --git a/stdlib/source/program/aedifex/repository/local.lux b/stdlib/source/program/aedifex/repository/local.lux
index 6cfdd0f0b..f59a04b85 100644
--- a/stdlib/source/program/aedifex/repository/local.lux
+++ b/stdlib/source/program/aedifex/repository/local.lux
@@ -36,7 +36,7 @@
        (..path /)
        (format (..root program /) /)))
 
-(implementation: #export (repository program fs)
+(implementation: .public (repository program fs)
   (-> (Program Async) (file.System Async) (//.Repository Async))
 
   (def: description
diff --git a/stdlib/source/program/aedifex/repository/origin.lux b/stdlib/source/program/aedifex/repository/origin.lux
index be7d24a6e..b850bf21f 100644
--- a/stdlib/source/program/aedifex/repository/origin.lux
+++ b/stdlib/source/program/aedifex/repository/origin.lux
@@ -10,11 +10,11 @@
      [file (#+ Path)]
      [net (#+ URL)]]]])
 
-(type: #export Origin
+(type: .public Origin
   (#Local Path)
   (#Remote URL))
 
-(def: #export equivalence
+(def: .public equivalence
   (Equivalence Origin)
   ($_ sum.equivalence
       text.equivalence
diff --git a/stdlib/source/program/aedifex/repository/remote.lux b/stdlib/source/program/aedifex/repository/remote.lux
index 76363c94f..feaf3201f 100644
--- a/stdlib/source/program/aedifex/repository/remote.lux
+++ b/stdlib/source/program/aedifex/repository/remote.lux
@@ -30,11 +30,11 @@
     ["#." artifact (#+ Version Artifact)
      [extension (#+ Extension)]]]])
 
-(type: #export Address
+(type: .public Address
   URL)
 
 (template [<name>]
-  [(exception: #export (<name> {url URL} {status Nat})
+  [(exception: .public (<name> {url URL} {status Nat})
      (exception.report
       ["URL" (%.text url)]
       ["Status Code" (%.nat status)]))]
@@ -43,18 +43,18 @@
   [upload_failure]
   )
 
-(def: #export (uri version_template artifact extension)
+(def: .public (uri version_template artifact extension)
   (-> Version Artifact Extension URI)
   (format (///artifact.uri version_template artifact) extension))
 
-(def: #export user_agent
+(def: .public user_agent
   (format "LuxAedifex/" (version.format language/lux.version)))
 
 (def: base_headers
   (List [Text Text])
   (list ["User-Agent" ..user_agent]))
 
-(implementation: #export (repository http identity address)
+(implementation: .public (repository http identity address)
   (All [s] (-> (http.Client IO) (Maybe Identity) Address (//.Repository IO)))
 
   (def: description
-- 
cgit v1.2.3