shrub/pkg/arvo/mar/verb/event.hoon

/-  verb
=,  dejs:format
|_  =event:verb
++  grad  %noun
++  grab
  |%
  ++  noun  event:verb
  --
::
++  grow
  |%
  ++  noun  event
  ++  json
    =,  enjs:format
    %+  frond  -.event
    ?-  -.event
      %on-init   ~
      %on-load   ~
      %on-poke   s+mark.event
      %on-watch  (path path.event)
      %on-leave  (path path.event)
      %on-agent  (pairs 'wire'^(path wire.event) 'sign'^s+sign.event ~)
      %on-arvo   (pairs 'wire'^(path wire.event) 'vane'^s+vane.event 'sign'^s+sign.event ~)
      %on-fail   s+term.event
    ==
  --
--
verb: allow subscribing to events This excludes, necessarily, events that don't let us emit moves. (+on-save, +on-peek) 2020-05-08 02:46:29 +03:00			`/- verb`
			`=, dejs:format`
			`\|_ =event:verb`
Merge remote-tracking branch 'origin/master' into ford-fusion 2020-06-20 00:52:18 +03:00			`++ grad %noun`
verb: allow subscribing to events This excludes, necessarily, events that don't let us emit moves. (+on-save, +on-peek) 2020-05-08 02:46:29 +03:00			`++ grab`
			`\|%`
			`++ noun event:verb`
			`--`
			`::`
			`++ grow`
			`\|%`
			`++ noun event`
			`++ json`
			`=, enjs:format`
			`%+ frond -.event`
			`?- -.event`
			`%on-init ~`
			`%on-load ~`
			`%on-poke s+mark.event`
			`%on-watch (path path.event)`
			`%on-leave (path path.event)`
			`%on-agent (pairs 'wire'^(path wire.event) 'sign'^s+sign.event ~)`
			`%on-arvo (pairs 'wire'^(path wire.event) 'vane'^s+vane.event 'sign'^s+sign.event ~)`
			`%on-fail s+term.event`
			`==`
			`--`
			`--`