gen: ensure +tally can run successfully

Apparently the group-store scry interface was changed recently.
This commit is contained in:
fang 2021-02-23 18:33:15 +01:00
parent 9a777e84de
commit 50d45b0703
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972

View File

@ -34,10 +34,8 @@
=/ groups=(list [local=? resource:re members=@ud])
%+ murn
%~ tap in
%~ key by
dir:(scry arch %y %group-store /groups)
|= i=@ta
=/ r=resource:re (de-path:re (stab i))
(scry (set resource:re) %y %group-store /groups)
|= r=resource:re
=/ g=(unit group:gr)
%+ scry (unit group:gr)
[%x %group-store [%groups (snoc (en-path:re r) %noun)]]