urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-02 08:55:07 +03:00
Code Issues Packages Projects Releases Wiki Activity

Moved init logic upstream.

Browse Source
This commit is contained in:
Fang 2017-06-13 18:46:02 -07:00
parent 9dbdd3f89f
commit d5e052daaa
1 changed files with 9 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

19
app/talk-guardian.hoon
View File

@ -213,8 +213,14 @@
::> populate state on first boot.
::> creates our default mailbox and journal.
::
::TODO but now init it spread out over two arms? ugly!
=< (ta-delta %init ~) :: side-effects
=< %- ta-deltas :: side-effects
=+ sen=(above our.bol)
?: ?| !=(%czar (clan sen))
=(sen our.bol)
=(%pawn (clan our.bol))
==
~
[%init ~]~
%+ roll
^- (list {security knot cord})
:~ [%brown (main our.bol) 'default home']
@ -1168,18 +1174,11 @@
++ da-init ::< startup side-effects
::>
::
=+ sen=(above our.bol)
::TODO move this logic to ta-init
?: ?| !=(%czar (clan sen))
=(sen our.bol)
=(%pawn (clan our.bol))
==
..da-init
%- da-emit
:* 0
%peer
/burden
[sen %talk-guardian]
[(above our.bol) %talk-guardian]
/burden/(scot %p our.bol)
==
::