Start adding custom type
This commit is contained in:
parent
bf38da3d4e
commit
d9b9edc7e1
@ -1,3 +1,4 @@
|
||||
/- browsermanager
|
||||
/+ *server, default-agent
|
||||
::
|
||||
|%
|
||||
@ -37,7 +38,22 @@
|
||||
(on-arvo:def wire sign-arvo)
|
||||
[~ this]
|
||||
::
|
||||
++ on-poke on-poke:def
|
||||
::
|
||||
++ on-poke
|
||||
|= [=mark =vase]
|
||||
^- (quip card _this)
|
||||
?+ mark
|
||||
(on-poke:def mark vase)
|
||||
%noun ~& 'Browser Manager'
|
||||
~& mark
|
||||
~& vase
|
||||
`this
|
||||
%browsermanager-action
|
||||
=/ action !<(action:browsermanager vase)
|
||||
~& 'Browser Manager action'
|
||||
~& >>> action
|
||||
`this
|
||||
==
|
||||
++ on-save on-save:def
|
||||
++ on-load on-load:def
|
||||
++ on-leave on-leave:def
|
||||
|
7
gall-app/urbit/mar/browsermanager/action.hoon
Normal file
7
gall-app/urbit/mar/browsermanager/action.hoon
Normal file
@ -0,0 +1,7 @@
|
||||
/- browsermanager
|
||||
|_ act=action:browsermanager
|
||||
++ grab
|
||||
|%
|
||||
++ noun action:browsermanager
|
||||
--
|
||||
--
|
6
gall-app/urbit/sur/browsermanager.hoon
Normal file
6
gall-app/urbit/sur/browsermanager.hoon
Normal file
@ -0,0 +1,6 @@
|
||||
|%
|
||||
+$ action
|
||||
$? %ping
|
||||
[%submit-url @t]
|
||||
==
|
||||
--
|
Loading…
Reference in New Issue
Block a user