From 318ce7eb0798769a8597a2dce35094a90f5b0a4e Mon Sep 17 00:00:00 2001 From: Simon Michael Date: Sun, 1 Dec 2019 08:31:50 -0800 Subject: [PATCH] remove old fail compatibility imports that are obsolete ? --- hledger-lib/Hledger/Data/Dates.hs | 2 -- hledger-lib/Hledger/Read/Common.hs | 2 -- hledger-lib/Hledger/Read/CsvReader.hs | 2 -- hledger-lib/Hledger/Read/JournalReader.hs | 2 -- hledger/Hledger/Cli/Commands/Add.hs | 2 -- 5 files changed, 10 deletions(-) diff --git a/hledger-lib/Hledger/Data/Dates.hs b/hledger-lib/Hledger/Data/Dates.hs index 20acae22e..5f533de4a 100644 --- a/hledger-lib/Hledger/Data/Dates.hs +++ b/hledger-lib/Hledger/Data/Dates.hs @@ -75,8 +75,6 @@ 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 36043c20c..08f89d560 100644 --- a/hledger-lib/Hledger/Read/Common.hs +++ b/hledger-lib/Hledger/Read/Common.hs @@ -100,8 +100,6 @@ 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 9d0add2d5..3b44e5c90 100644 --- a/hledger-lib/Hledger/Read/CsvReader.hs +++ b/hledger-lib/Hledger/Read/CsvReader.hs @@ -30,8 +30,6 @@ 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 358109847..0b057cfd4 100644 --- a/hledger-lib/Hledger/Read/JournalReader.hs +++ b/hledger-lib/Hledger/Read/JournalReader.hs @@ -63,8 +63,6 @@ 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 7b8ba81f3..63077cf32 100644 --- a/hledger/Hledger/Cli/Commands/Add.hs +++ b/hledger/Hledger/Cli/Commands/Add.hs @@ -15,8 +15,6 @@ 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