diff options
| -rw-r--r-- | main/WebSocket.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/main/WebSocket.hs b/main/WebSocket.hs index 79cb141..827b3fe 100644 --- a/main/WebSocket.hs +++ b/main/WebSocket.hs @@ -39,6 +39,8 @@ instance PeerAddressType WebSocketAddress where | Just WS.ConnectionClosed <- fromException e -> return () | otherwise -> throwIO e + isReliableTransport _ = True + data WebSocketOptions = WebSocketOptions { wsAddress :: String |