aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/artifact/snapshot
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/source/test/aedifex/artifact/snapshot')
-rw-r--r--stdlib/source/test/aedifex/artifact/snapshot/version/value.lux12
1 files changed, 6 insertions, 6 deletions
diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
index 8daf8635c..a6532c250 100644
--- a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
+++ b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux
@@ -47,18 +47,18 @@
(do random.monad
[sample random
stamp $///stamp.random]
- (let [version (value@ #/.version sample)
+ (let [version (value@ /.#version sample)
local!
(text\= version
- (/.format (with@ #/.snapshot #///.Local sample)))
+ (/.format (with@ /.#snapshot {///.#Local} sample)))
- remote_format (/.format [#/.version (format version /.snapshot)
- #/.snapshot {#///.Remote stamp}])
+ remote_format (/.format [/.#version (format version /.snapshot)
+ /.#snapshot {///.#Remote stamp}])
remote!
- (and (text.starts_with? (format version (///time.format (value@ #///stamp.time stamp)))
+ (and (text.starts_with? (format version (///time.format (value@ ///stamp.#time stamp)))
remote_format)
- (text.ends_with? (%.nat (value@ #///stamp.build stamp))
+ (text.ends_with? (%.nat (value@ ///stamp.#build stamp))
remote_format))]
(_.cover [/.snapshot /.format]
(and local!