pipes-bytestring 1.0.0 → 1.0.1

raw patch · 2 files changed

+2/−2 lines, 2 files

Files

pipes-bytestring.cabal +1/−1
src/Pipes/ByteString.hs +1/−1

pipes-bytestring.cabal view

@@ -1,5 +1,5 @@ Name: pipes-bytestring-Version: 1.0.0+Version: 1.0.1 Cabal-Version: >=1.8.0.2 Build-Type: Simple License: BSD3

src/Pipes/ByteString.hs view

@@ -694,7 +694,7 @@         p' <- break (fromIntegral (ord '\n') ==) p         return $ PP.FreeT (go2 p')     go2 p = do-        x  <- next p+        x  <- nextByte p         return $ case x of             Left   r      -> PP.Pure r             Right (_, p') -> PP.Free (go1 p')