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

Make hall and talk always use ost.bol instead of bone 0, which gall now disallows.

Browse Source
This commit is contained in:
Fang 2018-01-25 19:03:22 +01:00
parent af4fe5d885
commit 2b08d7fbd9
2 changed files with 11 additions and 11 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
app/hall.hoon
View File

@ -1931,7 +1931,7 @@
%^ circle-wire nom
~[%grams %config-l %group-l]
[cir ran]
[0 %pull wir [hos.cir dap.bol] ~]
[ost.bol %pull wir [hos.cir dap.bol] ~]
::
++ sa-eject
:> removes ships {sis} from {followers}.
@ -1996,7 +1996,7 @@
|= wir/wire
^- move
=+ tar=(wire-to-target wir)
[0 %peer wir [p.tar dap.bol] q.tar]
[ost.bol %peer wir [p.tar dap.bol] q.tar]
::
++ wire-to-target
:> ship+path from wire
@ -2091,12 +2091,12 @@
%+ turn ~(tap in ~(key by stories))
|= n/name
^- (list move)
:~ :^ 0 %poke /
:~ :^ ost.bol %poke /
:+ [our.bol dap.bol] %hall-action
:^ %source n |
[[[our.bol nom.qer] ran.qer] ~ ~]
::
:^ 0 %pull
:^ ost.bol %pull
%^ circle-wire n ~(tap in wat.qer)
[[our.bol nom.qer] ran.qer]
[[our.bol dap.bol] ~]
@ -2867,7 +2867,7 @@
:_ +>
=+ bov=(above our.bol)
?: =(bov our.bol) ~
:~ [0 %pull /burden [bov dap.bol] ~]
:~ [ost.bol %pull /burden [bov dap.bol] ~]
(wire-to-peer /burden)
==
?: =(a 'incoming')

12
app/talk.hoon
View File

@ -203,7 +203,7 @@
++ peer-client
:> ui state peer move
^- move
:* 0
:* ost.bol
%peer
/server/client
server
@ -212,7 +212,7 @@
::
++ peer-inbox
^- move
:* 0
:* ost.bol
%peer
/server/inbox
server
@ -2438,16 +2438,16 @@
?: =(a 'reconnect')
~& 'disconnecting and reconnecting to hall...'
:_ +>
:~ [0 %pull /server/client server ~]
[0 %pull /server/inbox server ~]
:~ [ost.bol %pull /server/client server ~]
[ost.bol %pull /server/inbox server ~]
peer-client
peer-inbox
==
?: =(a 'reset')
~& 'full reset incoming, hold on to your cli...'
:_ +>(grams ~, known ~, count 0)
:~ [0 %pull /server/client server ~]
[0 %pull /server/inbox server ~]
:~ [ost.bol %pull /server/client server ~]
[ost.bol %pull /server/inbox server ~]
peer-client
peer-inbox
==