summaryrefslogtreecommitdiffhomepage
path: root/Server.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Server.hs')
-rw-r--r--Server.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Server.hs b/Server.hs
index 5467fbe..527ac02 100644
--- a/Server.hs
+++ b/Server.hs
@@ -93,7 +93,7 @@ server o = runSettings settings . app o =<< newServerState
defaultSettings
app :: ServerOpts -> TVar ServerState -> Application
-app o ssv = websocketsOr WS.defaultConnectionOptions (websocketApp o ssv) webapp
+app o ssv = websocketsOr connectionOptions (websocketApp o ssv) webapp
where
webapp _ respond = respond $
responseLBS status400 [] "Not a WebSocket request"