briefer mixed amount debug output below level 3

This commit is contained in:
Simon Michael 2014-04-02 04:56:16 -07:00
parent a1531bcd09
commit 874c467789

View File

@ -332,7 +332,7 @@ canonicaliseAmount styles a@Amount{acommodity=c, astyle=s} = a{astyle=s'}
instance Show MixedAmount where
show
-- debugLevel < 3 = intercalate "\\n" . lines . showMixedAmountWithoutPrice
| debugLevel < 3 = intercalate "\\n" . lines . showMixedAmountWithoutPrice
-- debugLevel < 6 = intercalate "\\n" . lines . showMixedAmount
| otherwise = showMixedAmountDebug