diff options
Diffstat (limited to 'stdlib/source/program/aedifex/artifact/snapshot.lux')
| -rw-r--r-- | stdlib/source/program/aedifex/artifact/snapshot.lux | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/stdlib/source/program/aedifex/artifact/snapshot.lux b/stdlib/source/program/aedifex/artifact/snapshot.lux index 5ac1e126a..16e10286e 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot.lux @@ -17,7 +17,7 @@ (type: .public Snapshot (Variant - #Local + {#Local} {#Remote Stamp})) (implementation: any_equivalence @@ -45,9 +45,9 @@ (def: local_copy_format XML - {#xml.Node <local_copy> + {xml.#Node <local_copy> xml.attributes - (list {#xml.Text ..local_copy_value})}) + (list {xml.#Text ..local_copy_value})}) (def: local_copy_parser (Parser Any) @@ -57,9 +57,9 @@ (def: .public (format snapshot) (-> Snapshot XML) - (<| {#xml.Node ..<snapshot> xml.attributes} + (<| {xml.#Node ..<snapshot> xml.attributes} (case snapshot - #Local + {#Local} (list ..local_copy_format) {#Remote stamp} |