diff --git a/src/Data/CSV/Sip.hs b/src/Data/CSV/Sip.hs index 42ddb10..f73db20 100644 --- a/src/Data/CSV/Sip.hs +++ b/src/Data/CSV/Sip.hs @@ -153,7 +153,7 @@ encodeCSV :: Monad m => [[T.Text]] -- ^ the data being encoded, organized into rows and fields - -> ConduitT () BS.ByteString m () + -> ConduitT o BS.ByteString m () encodeCSV csv = sourceList csv .| encodeRows -- | encode an entire CSV file @@ -161,7 +161,7 @@ encodeRawCSV :: Monad m => [[BS.ByteString]] -- ^ the data being encoded, organized into rows and fields - -> ConduitT () BS.ByteString m () + -> ConduitT o BS.ByteString m () encodeRawCSV csv = sourceList csv .| encodeRawRows -- | Writes a stream of Text-based rows to a CSV file