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

whitespace

Browse Source
This commit is contained in:
Simon Michael 2015-09-22 12:59:25 -07:00
parent af33a5ac3d
commit f4c963b648
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
hledger-lib/Hledger/Data/Types.hs
View File

@ -19,6 +19,7 @@ For more detailed documentation on each type, see the corresponding modules.
module Hledger.Data.Types module Hledger.Data.Types
where where
import GHC.Generics (Generic) import GHC.Generics (Generic)
import Control.DeepSeq (NFData) import Control.DeepSeq (NFData)
import Control.Monad.Except (ExceptT) import Control.Monad.Except (ExceptT)
@ -76,7 +77,7 @@ type Quantity = Decimal
deriving instance Data (Quantity) deriving instance Data (Quantity)
-- The following is for hledger-web, and requires blaze-markup. -- The following is for hledger-web, and requires blaze-markup.
-- Doing it here avoids needing a matching flag on the hledger-web package. -- Doing it here avoids needing a matching flag on the hledger-web package.
instance ToMarkup (Quantity) instance ToMarkup (Quantity)
where where
toMarkup = toMarkup . show toMarkup = toMarkup . show
numberRepresentation = "Decimal" numberRepresentation = "Decimal"