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

when reporting a balancing error, convert the error amount to cost

Browse Source
This commit is contained in:
Simon Michael 2010-05-25 22:18:36 +00:00
parent 9fab50fb61
commit d52283f314
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
hledger-lib/Hledger/Data/Transaction.hs
View File

@ -155,9 +155,9 @@ nonzerobalanceerror t = printf "could not balance this transaction (%s%s%s)" rms
where where
(rsum, _, bvsum) = transactionPostingBalances t (rsum, _, bvsum) = transactionPostingBalances t
rmsg | isReallyZeroMixedAmountCost rsum = "" rmsg | isReallyZeroMixedAmountCost rsum = ""
| otherwise = "real postings are off by " ++ show rsum | otherwise = "real postings are off by " ++ show (costOfMixedAmount rsum)
bvmsg | isReallyZeroMixedAmountCost bvsum = "" bvmsg | isReallyZeroMixedAmountCost bvsum = ""
| otherwise = "balanced virtual postings are off by " ++ show bvsum | otherwise = "balanced virtual postings are off by " ++ show (costOfMixedAmount bvsum)
sep = if not (null rmsg) && not (null bvmsg) then "; " else "" sep = if not (null rmsg) && not (null bvmsg) then "; " else ""
-- | Convert the primary date to either the actual or effective date. -- | Convert the primary date to either the actual or effective date.