Added missing space to simpleserver output
commita5f81aad44a4df07a13fe1d948b4c0d9cf99459c
authorMichael Snoyman <michael@snoyman.com>
dateSun 4 Apr 2010, 11:18 (17 years ago)
parentbdab546
Network/Wai/Handler/SimpleServer.hs+1
@@ -152,6 +152,7 @@ sendResponse httpversion h res = do
152152 B.hPut h $ httpVersionToBS httpversion
153153 B.hPut h $ B.pack " "
154154 B.hPut h $ B.pack $ show $ statusCode $ status res
155+ B.hPut h $ B.pack " "
155156 B.hPut h $ statusMessage $ status res
156157 B.hPut h $ B.pack "\r\n"
157158 mapM_ putHeader $ responseHeaders res
wai-extra.cabal+1−1
@@ -1,5 +1,5 @@
11Name: wai-extra
2−Version: 0.0.0
2+Version: 0.0.0.1
33Synopsis: Provides some basic WAI handlers and middleware.
44Description: The goal here is to provide common features without many dependencies.
55License: BSD3