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/metadata/snapshot.lux | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

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

diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux
index 6a9d812c9..69e3432fa 100644
--- a/stdlib/source/program/aedifex/metadata/snapshot.lux
+++ b/stdlib/source/program/aedifex/metadata/snapshot.lux
@@ -45,7 +45,7 @@
       ["#/." version]
       ["#/." stamp]]]]])
 
-(type: #export Metadata
+(type: .public Metadata
   {#artifact Artifact
    #versioning Versioning})
 
@@ -68,7 +68,7 @@
   [version_format Version ..<version> (|>)]
   )
 
-(def: #export (format (^slots [#artifact #versioning]))
+(def: .public (format (^slots [#artifact #versioning]))
   (-> Metadata XML)
   (let [(^slots [#///artifact.group #///artifact.name #///artifact.version]) artifact]
     (#xml.Node ..<metadata>
@@ -83,7 +83,7 @@
   (<| (<xml>.node tag)
       <xml>.text))
 
-(def: #export parser
+(def: .public parser
   (Parser Metadata)
   (<| (<xml>.node ..<metadata>)
       (do {! <>.monad}
@@ -111,18 +111,18 @@
                         #///artifact.version version}
              #versioning versioning}))))
 
-(def: #export equivalence
+(def: .public equivalence
   (Equivalence Metadata)
   ($_ product.equivalence
       ///artifact.equivalence
       ///artifact/versioning.equivalence
       ))
 
-(def: #export uri
+(def: .public uri
   (-> Artifact URI)
   //.remote_artifact_uri)
 
-(def: #export (read repository artifact)
+(def: .public (read repository artifact)
   (-> (Repository Async) Artifact (Async (Try Metadata)))
   (do async.monad
     [project (\ repository download (..uri artifact))]
@@ -139,7 +139,7 @@
            {#artifact artifact
             #versioning ///artifact/versioning.init})))))
 
-(def: #export (write repository artifact metadata)
+(def: .public (write repository artifact metadata)
   (-> (Repository Async) Artifact Metadata (Async (Try Any)))
   (|> metadata
       ..format
-- 
cgit v1.2.3