removing trailing spaces.
commitea5764560c6909b6b0c55c1b60fe0e690bcd1d6d
authorKazu Yamamoto <kazu@iij.ad.jp>
dateWed 10 Jun 2015, 14:54 (11 years ago)
parent96f0e98
warp/Network/Wai/Handler/Warp/RequestHeader.hs+1−1
@@ -146,7 +146,7 @@ parseByteRanges bs1 = do
146146 case B.readInteger bs4 of
147147 Just (j, bs5) | j >= i -> Just (HH.ByteRangeFromTo i j, bs5)
148148 _ -> Just (HH.ByteRangeFrom i, bs4)
149− ranges front bs3
149+ ranges front bs3
150150 | S.null bs3 = Just (front [])
151151 | otherwise = do
152152 bs4 <- stripPrefix "," bs3