diff --git a/Ledger/Amount.hs b/Ledger/Amount.hs index 1df13441b..9d772b4b9 100644 --- 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