simonmichael/hledger
1
1
Fork 0
mirror of https://github.com/simonmichael/hledger.git synced 2024-11-08 07:09:28 +03:00
Code Issues Projects Releases Wiki Activity

;fix Json.hs with old GHCs

Browse Source
This commit is contained in:
Simon Michael 2020-06-06 14:53:09 -07:00
parent a86a5c4f53
commit c59565ca5b
1 changed files with 4 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
hledger-lib/Hledger/Data/Json.hs
View File

@ -4,7 +4,7 @@ JSON instances. Should they be in Types.hs ?
{-# OPTIONS_GHC -fno-warn-orphans #-} {-# OPTIONS_GHC -fno-warn-orphans #-}
--{-# LANGUAGE CPP #-} {-# LANGUAGE CPP #-}
--{-# LANGUAGE DataKinds #-} --{-# LANGUAGE DataKinds #-}
--{-# LANGUAGE DeriveAnyClass #-} --{-# LANGUAGE DeriveAnyClass #-}
{-# LANGUAGE DeriveGeneric #-} {-# LANGUAGE DeriveGeneric #-}
@ -33,6 +33,9 @@ module Hledger.Data.Json (
,readJsonFile ,readJsonFile
) where ) where
#if !(MIN_VERSION_base(4,13,0))
import Data.Semigroup ((<>))
#endif
import Data.Aeson import Data.Aeson
import Data.Aeson.Encode.Pretty (encodePrettyToTextBuilder) import Data.Aeson.Encode.Pretty (encodePrettyToTextBuilder)
--import Data.Aeson.TH --import Data.Aeson.TH