slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

;fix build issues with old GHC versions

Browse Source
This commit is contained in:
Simon Michael 2019-11-28 15:22:12 -08:00
parent 5ea39d9987
commit 030b633cd6
2 changed files with 6 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
hledger-lib/Hledger/Read/JournalReader.hs
View File

@ -73,6 +73,9 @@ import Control.Monad.Except (ExceptT(..), runExceptT)
import Control.Monad.State.Strict (get,modify',put) import Control.Monad.State.Strict (get,modify',put)
import Control.Monad.Trans.Class (lift) import Control.Monad.Trans.Class (lift)
import qualified Data.Map.Strict as M import qualified Data.Map.Strict as M
#if !(MIN_VERSION_base(4,11,0))
import Data.Monoid ((<>))
#endif
import Data.Text (Text) import Data.Text (Text)
import Data.String import Data.String
import Data.List import Data.List

6
hledger-lib/Hledger/Utils/Test.hs
View File

@ -25,9 +25,9 @@ where
import Control.Monad.Except (ExceptT, runExceptT) import Control.Monad.Except (ExceptT, runExceptT)
import Control.Monad.State.Strict (StateT, evalStateT, execStateT) import Control.Monad.State.Strict (StateT, evalStateT, execStateT)
-- #if !(MIN_VERSION_base(4,11,0)) #if !(MIN_VERSION_base(4,11,0))
-- import Data.Monoid ((<>)) import Data.Monoid ((<>))
-- #endif #endif
-- import Data.CallStack -- import Data.CallStack
import Data.List (isInfixOf) import Data.List (isInfixOf)
import qualified Data.Text as T import qualified Data.Text as T