Restore wsCallService Haddock comments

src/HomeAssistant/Runtime.hs

@@ -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