Merge pull request #758 from AlexanderAA/master

Three typos
This commit is contained in:
Michael Snoyman 2014-06-16 08:51:27 +03:00
commit 576d1dedd2
2 changed files with 3 additions and 3 deletions

View File

@ -1 +1 @@
Learn more at http://docs.yesodweb.com/
Learn more at http://www.yesodweb.com/

View File

@ -67,13 +67,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 ()