graph-store: standardise archive format

This commit is contained in:
Liam Fitzgerald 2022-11-24 14:55:02 +10:00
parent ab578c7018
commit d9ae7c307b

View File

@ -112,7 +112,7 @@
|= [r=resource:store m=marked-graph:store] |= [r=resource:store m=marked-graph:store]
^- card ^- card
=/ pax /(rap 3 'archive-' (scot %p entity.r) '-' name.r ~)/noun =/ pax /(rap 3 'archive-' (scot %p entity.r) '-' name.r ~)/noun
=/ =cage drum-put+!>([pax (jam m)]) =/ =cage drum-put+!>([pax (jam r m)])
[%pass /archive %agent [our.bowl %hood] %poke cage] [%pass /archive %agent [our.bowl %hood] %poke cage]
== ==
== ==