From fc8b126e9e0a400d68f51a35c1e0ffc77fcbb082 Mon Sep 17 00:00:00 2001 From: Alexander Date: Sun, 8 Jun 2014 15:20:27 +1200 Subject: [PATCH] Typo fix --- yesod-websockets/Yesod/WebSockets.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/yesod-websockets/Yesod/WebSockets.hs b/yesod-websockets/Yesod/WebSockets.hs index eebe9202..c42c3251 100644 --- a/yesod-websockets/Yesod/WebSockets.hs +++ b/yesod-websockets/Yesod/WebSockets.hs @@ -61,13 +61,13 @@ webSockets inner = do receiveData :: (MonadIO m, WS.WebSocketsData a) => WebSocketsT m a receiveData = ReaderT $ liftIO . WS.receiveData --- | Send a textual messsage to the client. +-- | Send a textual message to the client. -- -- Since 0.1.0 sendTextData :: (MonadIO m, WS.WebSocketsData a) => a -> WebSocketsT m () sendTextData x = ReaderT $ liftIO . flip WS.sendTextData x --- | Send a binary messsage to the client. +-- | Send a binary message to the client. -- -- Since 0.1.0 sendBinaryData :: (MonadIO m, WS.WebSocketsData a) => a -> WebSocketsT m ()