shrub/pkg/arvo/mar/group/action.hoon

39 lines
630 B
Plaintext

/+ *group-json
=, dejs:format
|_ act=group-action
++ grad %noun
++ grow
|%
++ noun act
--
++ grab
|%
++ noun group-action
++ json
|= jon=^json
=< (parse-group-action jon)
|%
++ parse-group-action
%- of
:~
[%add add-action]
[%remove remove-action]
[%bundle pa]
[%unbundle pa]
==
::
++ add-action
%- ot
:~ [%members (as (su ;~(pfix sig fed:ag)))]
[%path pa]
==
::
++ remove-action
%- ot
:~ [%members (as (su ;~(pfix sig fed:ag)))]
[%path pa]
==
--
--
--