typo
This commit is contained in:
1 parent
82085eaaf9
commit
c1e9fb7b8e
1 file changed
+1
-1
+1
-1
@@ -217,7 +217,7 @@ decodeUTF8 bs = case decodeUtf8' bs of
|
|||||||
Left _ -> Nothing
|
Left _ -> Nothing
|
||||||
Right txt -> Just txt
|
Right txt -> Just txt
|
||||||
|
|
||||||
-- | convert a stream to ByteStrings to a string of bytes
|
-- | convert a stream to ByteStrings to a stream of bytes
|
||||||
toBytes :: Monad m => ConduitT BS.ByteString Word8 m ()
|
toBytes :: Monad m => ConduitT BS.ByteString Word8 m ()
|
||||||
toBytes = await >>= \case
|
toBytes = await >>= \case
|
||||||
Just bs -> do
|
Just bs -> do
|
||||||
|
|||||||
Reference in new issue
Block a user