urbit/pkg/arvo/mar/group/action.hoon
2020-06-02 15:07:09 +10:00

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]
:: ==
:: --
--
--