diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/program/aedifex/metadata/artifact.lux | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux index 777c7df1b..0bd6d4a12 100644 --- a/stdlib/source/program/aedifex/metadata/artifact.lux +++ b/stdlib/source/program/aedifex/metadata/artifact.lux @@ -38,7 +38,7 @@ [repository (#+ Repository)] ["#." artifact (#+ Group Name Version Artifact)]]]) -(type: #export Metadata +(type: .public Metadata {#group Group #name Name #versions (List Version) @@ -95,7 +95,7 @@ (-> (List Version) XML) (|>> (list\map ..version_format) (#xml.Node ..<versions> xml.attributes))) -(def: #export (format value) +(def: .public (format value) (-> Metadata XML) (#xml.Node ..<metadata> xml.attributes @@ -141,7 +141,7 @@ (in (instant.of_date_time date time))) (..text ..<last_updated>))) -(def: #export parser +(def: .public parser (Parser Metadata) (<| (<xml>.node ..<metadata>) ($_ <>.and @@ -155,7 +155,7 @@ (<xml>.somewhere ..last_updated_parser) ))))) -(def: #export equivalence +(def: .public equivalence (Equivalence Metadata) ($_ product.equivalence text.equivalence @@ -164,7 +164,7 @@ instant.equivalence )) -(def: #export uri +(def: .public uri (-> Artifact URI) //.remote_project_uri) @@ -172,7 +172,7 @@ Instant (instant.of_millis +0)) -(def: #export (read repository artifact) +(def: .public (read repository artifact) (-> (Repository Async) Artifact (Async (Try Metadata))) (do async.monad [project (\ repository download (..uri artifact))] @@ -192,7 +192,7 @@ #versions (list) #last_updated ..epoch})))))) -(def: #export (write repository artifact metadata) +(def: .public (write repository artifact metadata) (-> (Repository Async) Artifact Metadata (Async (Try Any))) (|> metadata ..format |