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

fix the haddock for amounts (#382)

Browse Source
This commit is contained in:
Sam Doshi 2016-08-03 17:29:22 +01:00 committed by Simon Michael
parent 2bee53af96
commit 7bd5422c01
1 changed files with 3 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
hledger-lib/Hledger/Data/Amount.hs
View File

@ -434,9 +434,9 @@ sumSimilarAmountsUsingFirstPrice :: [Amount] -> Amount
sumSimilarAmountsUsingFirstPrice [] = nullamt sumSimilarAmountsUsingFirstPrice [] = nullamt
sumSimilarAmountsUsingFirstPrice as = (sum as){aprice=aprice $ head as} sumSimilarAmountsUsingFirstPrice as = (sum as){aprice=aprice $ head as}
-- | Sum same-commodity amounts. If there were different prices, set -- -- | Sum same-commodity amounts. If there were different prices, set
-- the price to a special marker indicating "various". Only used as a -- -- the price to a special marker indicating "various". Only used as a
-- rendering helper. -- -- rendering helper.
-- sumSimilarAmountsNotingPriceDifference :: [Amount] -> Amount -- sumSimilarAmountsNotingPriceDifference :: [Amount] -> Amount
-- sumSimilarAmountsNotingPriceDifference [] = nullamt -- sumSimilarAmountsNotingPriceDifference [] = nullamt
-- sumSimilarAmountsNotingPriceDifference as = undefined -- sumSimilarAmountsNotingPriceDifference as = undefined