diff --git a/yesod-websockets/Yesod/WebSockets.hs b/yesod-websockets/Yesod/WebSockets.hs index 8512b0ba..e4740266 100644 --- a/yesod-websockets/Yesod/WebSockets.hs +++ b/yesod-websockets/Yesod/WebSockets.hs @@ -117,8 +117,8 @@ webSocketsOptionsWith wsConnOpts buildAr inner = do rhead (\pconn -> do conn <- WS.acceptRequestWith pconn ar - WS.forkPingThread conn 30 - runInIO $ runReaderT inner conn) + WS.withPingThread conn 30 (pure ()) $ + runInIO $ runReaderT inner conn) src sink diff --git a/yesod-websockets/yesod-websockets.cabal b/yesod-websockets/yesod-websockets.cabal index eafe5bc6..8d0d9da7 100644 --- a/yesod-websockets/yesod-websockets.cabal +++ b/yesod-websockets/yesod-websockets.cabal @@ -1,5 +1,5 @@ name: yesod-websockets -version: 0.3.0.2 +version: 0.3.0.3 synopsis: WebSockets support for Yesod homepage: https://github.com/yesodweb/yesod license: MIT