diff options
Diffstat (limited to 'stdlib/source/test/aedifex/metadata/artifact.lux')
| -rw-r--r-- | stdlib/source/test/aedifex/metadata/artifact.lux | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/stdlib/source/test/aedifex/metadata/artifact.lux b/stdlib/source/test/aedifex/metadata/artifact.lux index eb8b4aec1..e5e903e65 100644 --- a/stdlib/source/test/aedifex/metadata/artifact.lux +++ b/stdlib/source/test/aedifex/metadata/artifact.lux @@ -60,10 +60,10 @@ month (month.by_number month) date (date.date year month day_of_month) time (time.time - {#time.hour hour + [#time.hour hour #time.minute minute #time.second second - #time.milli_second 0})] + #time.milli_second 0])] (in (instant.of_date_time date time)))))))) (def: .public test @@ -72,12 +72,12 @@ (_.for [/.Metadata]) (do random.monad [expected ..random - .let [artifact {#///artifact.group (value@ #/.group expected) + .let [artifact [#///artifact.group (value@ #/.group expected) #///artifact.name (value@ #/.name expected) #///artifact.version (|> expected (value@ #/.versions) list.head - (maybe.else ""))}]] + (maybe.else ""))]]] ($_ _.and (_.for [/.equivalence] ($equivalence.spec /.equivalence ..random)) |