Restore wsCallService Haddock comments

This commit is contained in:
2026-08-20 14:45:04 +03:00
parent 54622a0b07
commit 5c05705cc1
+4 -4
View File
@@ -86,10 +86,10 @@ receiveJSON conn = do
wsCallService wsCallService
:: WS.Connection :: WS.Connection
-> Int -> Int -- ^ request id
-> T.Text -> T.Text -- ^ domain
-> T.Text -> T.Text -- ^ service
-> T.Text -> T.Text -- ^ entity id
-> IO () -> IO ()
wsCallService conn requestId domain service entityId = wsCallService conn requestId domain service entityId =
WS.sendTextData conn $ encode $ object WS.sendTextData conn $ encode $ object