haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove the use of forkPingThread in Yesod.WebSockets and replaced it with withPingThread

Browse Source
This commit is contained in:
David Burkett 2020-11-04 20:34:37 -05:00
parent bcae4c99b1
commit ead5d3388f
2 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
yesod-websockets/Yesod/WebSockets.hs
View File

@ -117,8 +117,8 @@ webSocketsOptionsWith wsConnOpts buildAr inner = do
rhead rhead
(\pconn -> do (\pconn -> do
conn <- WS.acceptRequestWith pconn ar conn <- WS.acceptRequestWith pconn ar
WS.forkPingThread conn 30 WS.withPingThread conn 30 (pure ()) $
runInIO $ runReaderT inner conn) runInIO $ runReaderT inner conn)
src src
sink sink

2
yesod-websockets/yesod-websockets.cabal
View File

@ -1,5 +1,5 @@
name: yesod-websockets name: yesod-websockets
version: 0.3.0.2 version: 0.3.0.3
synopsis: WebSockets support for Yesod synopsis: WebSockets support for Yesod
homepage: https://github.com/yesodweb/yesod homepage: https://github.com/yesodweb/yesod
license: MIT license: MIT