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

fix: errors: assertions: don't show actual and asserted reversed

Browse Source
This commit is contained in:
Simon Michael 2022-07-12 16:33:51 +01:00
parent 41234f0e10
commit e6959743f5
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/Balancing.hs
View File

@ -603,10 +603,10 @@ checkBalanceAssertionOneCommodityB p@Posting{paccount=assertedacct} assertedamt
assertedcomm assertedcomm
(if istotal then " (no other commodity balance allowed)" else "" :: String) (if istotal then " (no other commodity balance allowed)" else "" :: String)
-- (asprecision $ astyle actualbalincommodity) -- should be the standard display precision I think -- (asprecision $ astyle actualbalincommodity) -- should be the standard display precision I think
(show $ aquantity actualbalincomm)
-- (showAmount actualbalincommodity)
(show $ aquantity assertedamt) (show $ aquantity assertedamt)
-- (showAmount assertedamt) -- (showAmount assertedamt)
(show $ aquantity actualbalincomm)
-- (showAmount actualbalincommodity)
(show $ aquantity assertedamt - aquantity actualbalincomm) (show $ aquantity assertedamt - aquantity actualbalincomm)
where where
ass = fromJust $ pbalanceassertion p -- PARTIAL: fromJust won't fail, there is a balance assertion ass = fromJust $ pbalanceassertion p -- PARTIAL: fromJust won't fail, there is a balance assertion