diff options
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/program/aedifex/package.lux | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/program/aedifex/package.lux b/stdlib/source/program/aedifex/package.lux index 1144e8f4a..ea9c2a6d8 100644 --- a/stdlib/source/program/aedifex/package.lux +++ b/stdlib/source/program/aedifex/package.lux @@ -28,13 +28,13 @@ [remote (#+ Address)] ["#." origin (#+ Origin)]]]) -(type: #export Package +(type: .public Package {#origin Origin #library [Binary Status] #pom [XML Binary Status]}) (template [<name> <tag>] - [(def: #export (<name> package) + [(def: .public (<name> package) (-> Package Bit) (case (get@ #origin package) (<tag> _) @@ -47,7 +47,7 @@ [remote? #//origin.Remote] ) -(def: #export (local pom library) +(def: .public (local pom library) (-> XML Binary Package) {#origin (#//origin.Local "") #library [library @@ -59,7 +59,7 @@ (#//status.Verified (//hash.sha-1 binary_pom) (//hash.md5 binary_pom))])}) -(def: #export dependencies +(def: .public dependencies (-> Package (Try (Set Dependency))) (|>> (get@ #pom) product.left @@ -67,7 +67,7 @@ (<xml>.run //pom.parser) (try\map (get@ #/.dependencies)))) -(def: #export repositories +(def: .public repositories (-> Package (Try (Set Address))) (|>> (get@ #pom) product.left @@ -75,7 +75,7 @@ (<xml>.run //pom.parser) (try\map (get@ #/.repositories)))) -(def: #export equivalence +(def: .public equivalence (Equivalence Package) ($_ product.equivalence //origin.equivalence |