git.iko.soy/jsaddle
on master help sign in
Fix warning
commit8d619292ebf9a1f75d11503b84ddca54c80718ad authorHamish Mackenzie <Hamish.K.Mackenzie@googlemail.com> dateThu 15 Jun 2017, 10:29 (9 years ago) parent0eb4e0c
1 file changed+1−1
compare with master
unifiedsplit
jsaddle-warp/src/Language/Javascript/JSaddle/WebSockets.hs+1−1
jsaddle-warp/src/Language/Javascript/JSaddle/WebSockets.hs+1−1
@@ -224,7 +224,7 @@ debugWrapper run = do
224224 thread <- forkIO $
225225 finally (run refreshMiddleware registerContext)
226226 (putMVar serverDone ())
227− forkIO $ threadDelay 10000000 >> void (tryPutMVar ready ())
227+ _ <- forkIO $ threadDelay 10000000 >> void (tryPutMVar ready ())
228228 when (expectedConnections /= 0) $ takeMVar ready
229229 return $ do
230230 putMVar reloadMVar ()