Restore wsCallService Haddock comments

2026-08-20 14:45:04 +03:00
parent 54622a0b07
commit 5c05705cc1
1 changed files with 4 additions and 4 deletions
@@ -86,10 +86,10 @@ receiveJSON conn = do

 wsCallService
  :: WS.Connection
-  -> Int
-  -> T.Text
-  -> T.Text
-  -> T.Text
+  -> Int           -- ^ request id
+  -> T.Text        -- ^ domain
+  -> T.Text        -- ^ service
+  -> T.Text        -- ^ entity id
  -> IO ()
 wsCallService conn requestId domain service entityId =
  WS.sendTextData conn $ encode $ object