aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/program/aedifex/artifact/versioning.lux
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/program/aedifex/artifact/versioning.lux')
-rw-r--r--stdlib/source/program/aedifex/artifact/versioning.lux16
1 files changed, 8 insertions, 8 deletions
diff --git a/stdlib/source/program/aedifex/artifact/versioning.lux b/stdlib/source/program/aedifex/artifact/versioning.lux
index 5812e4368..811db7ab9 100644
--- a/stdlib/source/program/aedifex/artifact/versioning.lux
+++ b/stdlib/source/program/aedifex/artifact/versioning.lux
@@ -35,12 +35,12 @@
#last_updated //time.Time
#versions (List Version)]))
-(def: .public init
+(def .public init
[#snapshot {//snapshot.#Local}
#last_updated //time.epoch
#versions (list)])
-(def: .public equivalence
+(def .public equivalence
(Equivalence Versioning)
(all product.equivalence
//snapshot.equivalence
@@ -49,7 +49,7 @@
))
(with_template [<definition> <tag>]
- [(def: <definition> xml.Tag ["" <tag>])]
+ [(def <definition> xml.Tag ["" <tag>])]
[<last_updated> "lastUpdated"]
[<snapshot_versions> "snapshotVersions"]
@@ -57,11 +57,11 @@
[<versioning> "versioning"]
)
-(def: last_updated_format
+(def last_updated_format
(-> //time.Time XML)
(|>> //time.format {xml.#Text} list {xml.#Node ..<last_updated> xml.attributes}))
-(def: .public (format (open "_[0]"))
+(def .public (format (open "_[0]"))
(-> Versioning XML)
(<| {xml.#Node ..<versioning> xml.attributes}
(list (//snapshot.format _#snapshot)
@@ -70,17 +70,17 @@
(list#each //snapshot/version.format)
{xml.#Node ..<snapshot_versions> xml.attributes}))))
-(def: (text tag)
+(def (text tag)
(-> xml.Tag (Parser Text))
(<| (<xml>.node tag)
<xml>.text))
-(def: last_updated_parser
+(def last_updated_parser
(Parser //time.Time)
(<| (<text>.then //time.parser)
(..text ..<last_updated>)))
-(def: .public parser
+(def .public parser
(Parser Versioning)
(<| (<xml>.node ..<versioning>)
(all <>.and