diff --git a/hledger-lib/Hledger/Data/Dates.hs b/hledger-lib/Hledger/Data/Dates.hs index 5f533de4a..20acae22e 100644 --- a/hledger-lib/Hledger/Data/Dates.hs +++ b/hledger-lib/Hledger/Data/Dates.hs @@ -75,6 +75,8 @@ module Hledger.Data.Dates ( ) where +import Prelude () +import "base-compat-batteries" Prelude.Compat hiding (fail) import qualified "base-compat-batteries" Control.Monad.Fail.Compat as Fail (MonadFail, fail) import Control.Applicative.Permutations import Control.Monad (unless) diff --git a/hledger-lib/Hledger/Read/Common.hs b/hledger-lib/Hledger/Read/Common.hs index 08f89d560..36043c20c 100644 --- a/hledger-lib/Hledger/Read/Common.hs +++ b/hledger-lib/Hledger/Read/Common.hs @@ -100,6 +100,8 @@ module Hledger.Read.Common ( ) where --- * imports +import Prelude () +import "base-compat-batteries" Prelude.Compat hiding (fail, readFile) import qualified "base-compat-batteries" Control.Monad.Fail.Compat as Fail (fail) import Control.Monad.Except (ExceptT(..), runExceptT, throwError) import Control.Monad.State.Strict hiding (fail) diff --git a/hledger-lib/Hledger/Read/CsvReader.hs b/hledger-lib/Hledger/Read/CsvReader.hs index 3b44e5c90..9d0add2d5 100644 --- a/hledger-lib/Hledger/Read/CsvReader.hs +++ b/hledger-lib/Hledger/Read/CsvReader.hs @@ -30,6 +30,8 @@ module Hledger.Read.CsvReader ( tests_CsvReader, ) where +import Prelude () +import "base-compat-batteries" Prelude.Compat hiding (fail) import qualified "base-compat-batteries" Control.Monad.Fail.Compat as Fail (fail) import Control.Exception (IOException, handle, throw) import Control.Monad (liftM, unless, when) diff --git a/hledger-lib/Hledger/Read/JournalReader.hs b/hledger-lib/Hledger/Read/JournalReader.hs index 0b057cfd4..358109847 100644 --- a/hledger-lib/Hledger/Read/JournalReader.hs +++ b/hledger-lib/Hledger/Read/JournalReader.hs @@ -63,6 +63,8 @@ module Hledger.Read.JournalReader ( ) where --- * imports +-- import qualified Prelude (fail) +-- import "base-compat-batteries" Prelude.Compat hiding (fail, readFile) import qualified "base-compat-batteries" Control.Monad.Fail.Compat as Fail (fail) import qualified Control.Exception as C import Control.Monad (forM_, when, void) diff --git a/hledger/Hledger/Cli/Commands/Add.hs b/hledger/Hledger/Cli/Commands/Add.hs index 63077cf32..7b8ba81f3 100644 --- a/hledger/Hledger/Cli/Commands/Add.hs +++ b/hledger/Hledger/Cli/Commands/Add.hs @@ -15,6 +15,8 @@ module Hledger.Cli.Commands.Add ( ) where +import Prelude () +import "base-compat-batteries" Prelude.Compat hiding (fail) import Control.Exception as E import Control.Monad (when) import Control.Monad.Trans.Class