hark: fix read-group action

This commit is contained in:
Liam Fitzgerald 2021-05-26 14:10:46 +10:00
parent 2fc10ecefa
commit d124bbdb57
No known key found for this signature in database
GPG Key ID: D390E12C61D1CFFB
2 changed files with 3 additions and 2 deletions

View File

@ -724,7 +724,8 @@
(graphs-of-group:met rid)
|-
?~ graphs poke-core
$(graphs t.graphs, poke-core (read-graph i.graphs))
=/ core=_poke-core (read-graph i.graphs)
$(graphs t.graphs, poke-core core)
::
++ remove-graph
|= rid=resource

View File

@ -99,7 +99,7 @@
++ graphs-of-group
|= group=resource
=/ =associations:store
(metadata-for-group)
(metadata-for-group group)
%+ murn ~(tap in ~(key by associations))
|= [=app-name:store rid=resource]
?.(=(%graph app-name) ~ `rid)