greg/urbit-browser-manager
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Some more state munging

Browse Source
This commit is contained in:
ronreg-ribdev 2020-12-03 03:19:10 -08:00
parent 87411236e3
commit 6379f38489
1 changed files with 10 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
gall-app/urbit/app/browsermanager.hoon
View File

@ -3,14 +3,19 @@
:: ::
|% |%
+$ versioned-state +$ versioned-state
$% state-0 $% [%0 state-0]
==
+$ state-0 $:
[%access count=@]
== ==
+$ state-0 [%0 [%ping-count count=@]]
+$ card card:agent:gall +$ card card:agent:gall
-- --
^- agent:gall ^- agent:gall
=< =<
=* state [%0 [%ping-count count=0]] =* state :- %0
:*
[%access count=0]
==
|_ bol=bowl:gall |_ bol=bowl:gall
+* this . +* this .
browsermanager-core +> browsermanager-core +>
@ -50,9 +55,8 @@
^- (quip card _this) ^- (quip card _this)
?+ mark ?+ mark
(on-poke:def mark vase) (on-poke:def mark vase)
%noun ~& 'Browser Manager' %noun ~& 'Browser Manager state'
~& mark ~& state
~& vase
`this `this
%browsermanager-action %browsermanager-action
=/ action !<(action:browsermanager vase) =/ action !<(action:browsermanager vase)