launch stabilise thread
closes #44 although stabilise functionality is still untested
This commit is contained in:
parent
81e346db4e
commit
c9783a10cf
|
@ -307,9 +307,10 @@ fediMainThreads sock nsSTM = do
|
||||||
-- all get cancelled
|
-- all get cancelled
|
||||||
concurrently_
|
concurrently_
|
||||||
(fediMessageHandler sendQ recvQ nsSTM) $
|
(fediMessageHandler sendQ recvQ nsSTM) $
|
||||||
concurrently
|
concurrently_ (stabiliseThread nsSTM) $
|
||||||
(sendThread sock sendQ)
|
concurrently_
|
||||||
(recvThread sock recvQ)
|
(sendThread sock sendQ)
|
||||||
|
(recvThread sock recvQ)
|
||||||
|
|
||||||
|
|
||||||
-- defining this here as, for now, the RequestMap is only used by fediMessageHandler.
|
-- defining this here as, for now, the RequestMap is only used by fediMessageHandler.
|
||||||
|
|
Loading…
Reference in a new issue