lib: restrict imports, avoiding GHCI clashes
This commit is contained in:
parent
1539b258b9
commit
7d56af5a03
@ -23,8 +23,8 @@ module Hledger.Read (
|
||||
readJournal',
|
||||
|
||||
-- * Re-exported
|
||||
accountaliasp,
|
||||
postingp,
|
||||
JournalReader.accountaliasp,
|
||||
JournalReader.postingp,
|
||||
module Hledger.Read.Common,
|
||||
|
||||
-- * Tests
|
||||
@ -51,11 +51,11 @@ import Text.Printf
|
||||
import Hledger.Data.Dates (getCurrentDay)
|
||||
import Hledger.Data.Types
|
||||
import Hledger.Read.Common
|
||||
import Hledger.Read.JournalReader as JournalReader
|
||||
import Hledger.Read.LedgerReader as LedgerReader
|
||||
import Hledger.Read.TimedotReader as TimedotReader
|
||||
import Hledger.Read.TimeclockReader as TimeclockReader
|
||||
import Hledger.Read.CsvReader as CsvReader
|
||||
import qualified Hledger.Read.JournalReader as JournalReader
|
||||
import qualified Hledger.Read.LedgerReader as LedgerReader
|
||||
import qualified Hledger.Read.TimedotReader as TimedotReader
|
||||
import qualified Hledger.Read.TimeclockReader as TimeclockReader
|
||||
import qualified Hledger.Read.CsvReader as CsvReader
|
||||
import Hledger.Utils
|
||||
import Prelude hiding (getContents, writeFile)
|
||||
import Hledger.Utils.UTF8IOCompat (writeFile)
|
||||
@ -241,11 +241,11 @@ samplejournal = readJournal' $ T.unlines
|
||||
tests_Hledger_Read = TestList $
|
||||
tests_readJournal'
|
||||
++ [
|
||||
tests_Hledger_Read_JournalReader,
|
||||
tests_Hledger_Read_LedgerReader,
|
||||
tests_Hledger_Read_TimeclockReader,
|
||||
tests_Hledger_Read_TimedotReader,
|
||||
tests_Hledger_Read_CsvReader,
|
||||
JournalReader.tests_Hledger_Read_JournalReader,
|
||||
LedgerReader.tests_Hledger_Read_LedgerReader,
|
||||
TimeclockReader.tests_Hledger_Read_TimeclockReader,
|
||||
TimedotReader.tests_Hledger_Read_TimedotReader,
|
||||
CsvReader.tests_Hledger_Read_CsvReader,
|
||||
|
||||
"journal" ~: do
|
||||
r <- runExceptT $ parseWithState mempty JournalReader.journalp ""
|
||||
|
||||
@ -13,8 +13,7 @@ module Ledger.Parser.Text
|
||||
) where
|
||||
|
||||
import Control.Applicative
|
||||
import Data.ByteString as B hiding (pack, unpack, singleton,
|
||||
zipWith, concat)
|
||||
import Data.ByteString (ByteString)
|
||||
import Data.Maybe
|
||||
import qualified Data.Text.Encoding as E
|
||||
import Filesystem.Path.CurrentOS hiding (concat)
|
||||
|
||||
Loading…
Reference in New Issue
Block a user