Use dot notation

digitallyinduced · Feb 5, 2023 · 351ae3c · 351ae3c
1 parent aca1a71
commit 351ae3c
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/IHP/WebSocket.hs b/IHP/WebSocket.hs
@@ -56,7 +56,7 @@ startWSApp connection = do
     let runWithPongChan pongChan = do
             let connectionOnPong = writeChan pongChan ()
             let ?connection = connection
-                    { WebSocket.connectionOptions = (get #connectionOptions connection) { WebSocket.connectionOnPong } 
+                    { WebSocket.connectionOptions = connection.connectionOptions { WebSocket.connectionOnPong } 
                     }
                 in
                     run @state