print: ensure 0 amounts also appear in the "debit" field

2017-01-10 08:58:11 -08:00 · 2017-01-10 08:58:11 -08:00 · 4abd029bae
commit 4abd029bae
parent 5fa8780e3f
1 changed files with 1 additions and 1 deletions
--- a/hledger/Hledger/Cli/Print.hs
+++ b/hledger/Hledger/Cli/Print.hs
@ -131,7 +131,7 @@ postingToCSV p =
    let amount = showAmount a_ in
    let commodity = T.unpack c in
    let credit = if q < 0 then showAmount $ negate a_ else "" in
-    let debit  = if q > 0 then showAmount a_ else "" in
+    let debit  = if q >= 0 then showAmount a_ else "" in
    account:amount:commodity:credit:debit:status:comment:[])
   amounts
  where