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