mirror of
https://github.com/urbit/shrub.git
synced 2024-12-20 09:21:42 +03:00
26 lines
391 B
Plaintext
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]
|
||
|
|
==
|
||
|
|
--
|
||
|
|
--
|
||
|
|
--
|