voidlizard
/
hbs2
mirror of https://github.com/voidlizard/hbs2
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

wip, semion semionovich...

This commit is contained in:
Dmitry Zuikov 2023-07-15 17:04:14 +03:00
parent bc39601fbc
commit 28590c6936
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
hbs2-peer/app/PeerMain.hs
View File

@ -891,6 +891,7 @@ runPeer opts = U.handle (\e -> myException e
, makeResponse (refLogRequestProto reflogReqAdapter) , makeResponse (refLogRequestProto reflogReqAdapter)
, makeResponse (peerMetaProto (mkPeerMeta conf)) , makeResponse (peerMetaProto (mkPeerMeta conf))
, makeResponse (refChanHeadProto False refChanHeadAdapter) , makeResponse (refChanHeadProto False refChanHeadAdapter)
, makeResponse (refChanUpdateProto False refChanHeadAdapter)
] ]
void $ liftIO $ waitAnyCancel workers void $ liftIO $ waitAnyCancel workers