if we happen to be showing a not-yet-auto-balanced entry, hide the AUTO marker

2008-10-16 03:55:38 +00:00 · 2008-10-16 03:55:38 +00:00 · 0f2c8542fc
commit 0f2c8542fc
parent 68c5735c46
1 changed files with 1 additions and 0 deletions
--- a/Ledger/Amount.hs
+++ b/Ledger/Amount.hs
@ -84,6 +84,7 @@ groupAmountsByCommodity as = grouped
 -- display settings.
 showAmount :: Amount -> String
 showAmount (Amount (Commodity {symbol=sym,side=side,spaced=spaced,comma=comma,precision=p}) q)
+    | sym=="AUTO" = ""
    | side==L = printf "%s%s%s" sym space quantity
    | side==R = printf "%s%s%s" quantity space sym
    where