urbit/pkg/arvo/mar/group/hook-action.hoon

/-  *group-hook
=,  dejs:format
|_  act=action
++  grad  %noun
++  grow
  |%
  ++  noun  act
  --
++  grab
  |%
  ++  noun  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]
      ==
    --
  --
--
apps: added group/permission stores, hooks, marks 2019-09-25 23:31:31 +03:00			`/- *group-hook`
			`=, dejs:format`
groups: begin rewrite 2020-05-15 01:50:04 +03:00			`\|_ act=action`
mar: all marks build; added +grad and +noun:grow to many 2020-05-05 06:21:05 +03:00			`++ grad %noun`
			`++ grow`
			`\|%`
			`++ noun act`
			`--`
apps: added group/permission stores, hooks, marks 2019-09-25 23:31:31 +03:00			`++ grab`
			`\|%`
groups: begin rewrite 2020-05-15 01:50:04 +03:00			`++ noun action`
apps: added group/permission stores, hooks, marks 2019-09-25 23:31:31 +03:00			`++ 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]`
			`==`
			`--`
			`--`
			`--`