Helper core
This commit is contained in:
parent
d9b9edc7e1
commit
af2826a07c
@ -5,6 +5,7 @@
|
|||||||
+$ card card:agent:gall
|
+$ card card:agent:gall
|
||||||
--
|
--
|
||||||
^- agent:gall
|
^- agent:gall
|
||||||
|
=<
|
||||||
|_ bol=bowl:gall
|
|_ bol=bowl:gall
|
||||||
+* this .
|
+* this .
|
||||||
browsermanager-core +>
|
browsermanager-core +>
|
||||||
@ -50,9 +51,7 @@
|
|||||||
`this
|
`this
|
||||||
%browsermanager-action
|
%browsermanager-action
|
||||||
=/ action !<(action:browsermanager vase)
|
=/ action !<(action:browsermanager vase)
|
||||||
~& 'Browser Manager action'
|
[(handle-action action) this]
|
||||||
~& >>> action
|
|
||||||
`this
|
|
||||||
==
|
==
|
||||||
++ on-save on-save:def
|
++ on-save on-save:def
|
||||||
++ on-load on-load:def
|
++ on-load on-load:def
|
||||||
@ -60,3 +59,12 @@
|
|||||||
++ on-peek on-peek:def
|
++ on-peek on-peek:def
|
||||||
++ on-fail on-fail:def
|
++ on-fail on-fail:def
|
||||||
--
|
--
|
||||||
|
:: Helper core
|
||||||
|
|%
|
||||||
|
++ handle-action
|
||||||
|
|= action=action:browsermanager
|
||||||
|
^- (list card)
|
||||||
|
~& 'Browser Manager action'
|
||||||
|
~& >> action
|
||||||
|
~
|
||||||
|
--
|
||||||
|
Loading…
Reference in New Issue
Block a user