on master help sign in
Merge pull request #263 from DaveCTurner/master

Add missing backslashes to code in docs.

commit8c0c0c4369914fccd3c025692373362c556f7bf3 authorMichael Snoyman <michael@snoyman.com> dateSat 14 Jun 2014, 21:30 (12 years ago) parent60ff907b5a2421
1 file changed+8−8
wai/Network/Wai.hs+8−8
wai/Network/Wai.hs+8−8
@@ -138,12 +138,12 @@ responseLBS s h = ResponseBuilder s h . fromLazyByteString
138138-- @
139139-- app :: Application
140140-- app req respond = bracket_
141−-- (putStrLn "Allocating scarce resource")
142−-- (putStrLn "Cleaning up")
143−-- $ respond $ responseStream status200 [] $ \write flush -> do
144−-- write $ fromByteString "Hello\n"
141+-- (putStrLn \"Allocating scarce resource\")
142+-- (putStrLn \"Cleaning up\")
143+-- $ respond $ responseStream status200 [] $ \\write flush -> do
144+-- write $ fromByteString \"Hello\\n\"
145145-- flush
146−-- write $ fromByteString "World\n"
146+-- write $ fromByteString \"World\\n\"
147147-- @
148148--
149149-- Note that in some cases you can use @bracket@ from inside @responseStream@
@@ -235,9 +235,9 @@ responseToStream (ResponseRaw _ res) = responseToStream res
235235-- @
236236-- app :: Application
237237-- app req respond = bracket_
238−-- (putStrLn "Allocating scarce resource")
239−-- (putStrLn "Cleaning up")
240−-- (respond $ responseLBS status200 [] "Hello World")
238+-- (putStrLn \"Allocating scarce resource\")
239+-- (putStrLn \"Cleaning up\")
240+-- (respond $ responseLBS status200 [] \"Hello World\")
241241-- @
242242type Application = Request -> (Response -> IO ResponseReceived) -> IO ResponseReceived
243243