urbit/pkg/arvo/mar/group/hook-action.hoon
2019-10-02 18:30:50 -07:00

26 lines
391 B
Plaintext

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