@@ -433,12 +433,15 @@ This is a very simple mark file for the `update` type.
433|_ =bowl:gall
433|_ =bowl:gall
435 def ~(. (default-agent this %.n) bowl)
435 def ~(. (default-agent this %.n) bowl)
436++ on-init
437++ on-init
437 ^- (quip card _this)
438 ^- (quip card _this)
439++ on-save
441++ on-save
441 !>(state)
443 !>(state)
442++ on-load
445++ on-load
443 |= old-state=vase
446 |= old-state=vase
444 ^- (quip card _this)
447 ^- (quip card _this)
@@ -446,6 +449,7 @@ This is a very simple mark file for the `update` type.
447 %0 `this(state old)
450 %0 `this(state old)
449++ on-poke
453++ on-poke
450 |= [=mark =vase]
454 |= [=mark =vase]
451 ^- (quip card _this)
455 ^- (quip card _this)
@@ -505,6 +509,7 @@ This is a very simple mark file for the `update` type.
508++ on-watch
513++ on-watch
510 ^- (quip card _this)
515 ^- (quip card _this)
@@ -515,6 +520,7 @@ This is a very simple mark file for the `update` type.
515 :~ [%give %fact ~ %todo-update !>(`update:todo`initial+tasks)]
520 :~ [%give %fact ~ %todo-update !>(`update:todo`initial+tasks)]
518++ on-leave on-leave:def
524++ on-leave on-leave:def
519++ on-peek on-peek:def
525++ on-peek on-peek:def
520++ on-agent on-agent:def
526++ on-agent on-agent:def
@@ -580,12 +586,15 @@ currently exists, getting the new subscriber up to date.
580|_ =bowl:gall
586|_ =bowl:gall
582 def ~(. (default-agent this %.n) bowl)
588 def ~(. (default-agent this %.n) bowl)
583++ on-init
590++ on-init
584 ^- (quip card _this)
591 ^- (quip card _this)
586++ on-save
594++ on-save
588 !>(state)
596 !>(state)
589++ on-load
598++ on-load
590 |= old-state=vase
599 |= old-state=vase
591 ^- (quip card _this)
600 ^- (quip card _this)
@@ -593,6 +602,7 @@ currently exists, getting the new subscriber up to date.
594 %0 `this(state old)
603 %0 `this(state old)
596++ on-poke
606++ on-poke
597 |= [=mark =vase]
607 |= [=mark =vase]
598 ^- (quip card _this)
608 ^- (quip card _this)
@@ -611,9 +621,11 @@ currently exists, getting the new subscriber up to date.
614++ on-watch on-watch:def
625++ on-watch on-watch:def
615++ on-leave on-leave:def
626++ on-leave on-leave:def
616++ on-peek on-peek:def
627++ on-peek on-peek:def
617++ on-agent
629++ on-agent
618 |= [=wire =sign:agent:gall]
630 |= [=wire =sign:agent:gall]
619 ^- (quip card _this)
631 ^- (quip card _this)
@@ -639,6 +651,7 @@ currently exists, getting the new subscriber up to date.
642++ on-arvo on-arvo:def
655++ on-arvo on-arvo:def
643++ on-fail on-fail:def
656++ on-fail on-fail:def