diff --git a/hledger-lib/Hledger/Data/Journal.hs b/hledger-lib/Hledger/Data/Journal.hs index bf6986f14..9969d28af 100644 --- a/hledger-lib/Hledger/Data/Journal.hs +++ b/hledger-lib/Hledger/Data/Journal.hs @@ -552,7 +552,7 @@ checkBalanceAssertion p@Posting{ pbalanceassertion = Just (ass,_)} amt (case ptransaction p of Nothing -> ":" -- shouldn't happen Just t -> printf " in %s:\nin transaction:\n%s" - (showGenericSourcePos pos) (chomp $ show t) :: String + (showGenericSourcePos pos) (chomp $ showTransaction t) :: String where pos = snd $ fromJust $ pbalanceassertion p) (showPostingLine p) (showDate $ postingDate p)