mirror of
https://github.com/urbit/shrub.git
synced 2024-12-22 18:31:44 +03:00
34 lines
668 B
Plaintext
34 lines
668 B
Plaintext
/+ *group-store
|
|
=, dejs:format
|
|
|_ act=action
|
|
++ grab
|
|
|%
|
|
++ noun 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]
|
|
:: ==
|
|
:: --
|
|
--
|
|
--
|