diff --git a/hledger/Hledger/Cli/Register.hs b/hledger/Hledger/Cli/Register.hs index aa943dc96..26e7cacb8 100644 --- a/hledger/Hledger/Cli/Register.hs +++ b/hledger/Hledger/Cli/Register.hs @@ -149,6 +149,9 @@ postingsReportItemAsText opts (mdate, menddate, mdesc, p, b) = _ -> (id,acctwidth) amt = showMixedAmountWithoutPrice $ pamount p bal = showMixedAmountWithoutPrice b + -- alternate behaviour, show null amounts as 0 instead of blank + -- amt = if null amt' then "0" else amt' + -- bal = if null bal' then "0" else bal' (amtlines, ballines) = (lines amt, lines bal) (amtlen, ballen) = (length amtlines, length ballines) numlines = max 1 (max amtlen ballen)