mirror of
https://github.com/simonmichael/hledger.git
synced 2024-11-07 21:15:19 +03:00
Removed one qualified import
This commit is contained in:
parent
8b2f386c2f
commit
ec417a81ae
@ -62,7 +62,7 @@ import Test.HUnit hiding (State)
|
||||
import qualified Data.Csv as Cassava
|
||||
import qualified Data.Csv.Parser.Megaparsec as CassavaMP
|
||||
import qualified Data.ByteString as B
|
||||
import qualified Data.ByteString.Lazy as BL
|
||||
import Data.ByteString.Lazy (fromStrict)
|
||||
import Data.Foldable
|
||||
import Data.Either
|
||||
import Text.Megaparsec hiding (parse)
|
||||
@ -196,7 +196,7 @@ parseCassava path content =
|
||||
Left msg -> Left $ CSVError msg
|
||||
Right a -> Right a
|
||||
where parseResult = fmap parseResultToCsv $ CassavaMP.decodeWith decodeOptions Cassava.NoHeader path lazyContent
|
||||
lazyContent = BL.fromStrict $ T.encodeUtf8 content
|
||||
lazyContent = fromStrict $ T.encodeUtf8 content
|
||||
|
||||
decodeOptions :: Cassava.DecodeOptions
|
||||
decodeOptions = Cassava.defaultDecodeOptions {
|
||||
|
Loading…
Reference in New Issue
Block a user