ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-12-15 18:12:47 +03:00
Code Issues Packages Projects Releases Wiki Activity

Fixes compile errors in serer.hoon

Browse Source
This commit is contained in:
Elliot Glaysher 2018-10-23 11:34:59 -07:00
parent 5403983365
commit fe8512efff
1 changed files with 5 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
app/server.hoon
View File

@ -47,8 +47,6 @@
|= [session=@ud =bone data=wall] |= [session=@ud =bone data=wall]
^- [(list move) _m] ^- [(list move) _m]
:: ::
=/ lines=tape
::
:- :~ :* bone %http-response :- :~ :* bone %http-response
%start 200 %start 200
:~ ['content-type' 'text/event-stream'] :~ ['content-type' 'text/event-stream']
@ -58,6 +56,8 @@
complete=%.n complete=%.n
== == == ==
m m
::
:: %_ +>.$ :: %_ +>.$
:: :: +reconnect-session: reconnect an old session to a new http pipe :: :: +reconnect-session: reconnect an old session to a new http pipe
:: :: :: ::
@ -76,6 +76,7 @@
:- :~ :* bone %http-response :- :~ :* bone %http-response
%continue %continue
(wall-to-output data) (wall-to-output data)
complete=%.n
== == == ==
m m
:: ::
@ -87,7 +88,7 @@
%- crip %- crip
%- zing %- zing
%+ weld %+ weld
%+ turn data %+ turn wall
|= t=tape |= t=tape
"data: {t}\0a" "data: {t}\0a"
:: ::
@ -174,7 +175,7 @@
++ wake ++ wake
|= [wir=wire ~] |= [wir=wire ~]
^- (quip move _this) ^- (quip move _this)
~& [%tick wir now.bow] :: ~& [%tick wir now.bow]
:: ::
=^ moves events =^ moves events
(~(send-message event-source events) ost.bow ["{<now.bow>}" ~]) (~(send-message event-source events) ost.bow ["{<now.bow>}" ~])