fix hlint warning
commit34ee3a451839f705b2d15b61eee218f7c7ca8492
authorGreg Weber <greg@gregweber.info>
dateWed 26 Mar 2014, 14:31 (13 years ago)
parenta43774d
warp/Network/Wai/Handler/Warp/Response.hs+2−2
@@ -215,9 +215,9 @@ sendRsp :: Connection
215215sendRsp conn ver s0 hs0 restore (RspFile path mPart mRange hook) = restore $ do
216216 ex <- fileRange s0 hs path mPart mRange
217217 case ex of
218− Left _ex -> do
218+ Left _ex ->
219219#ifdef WARP_DEBUG
220− print _ex
220+ print _ex >>
221221#endif
222222 sendRsp conn ver s2 hs2 id (RspBuilder body True)
223223 Right (s, hs1, beg, len) -> do