From 01e5a2245de3d23670dbdd84064ea7ad65432aac Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Wed, 16 Apr 2014 14:45:41 -0700
Subject: [PATCH] clarify balance assertion error slightly

---
 hledger-lib/Hledger/Data/Journal.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger-lib/Hledger/Data/Journal.hs b/hledger-lib/Hledger/Data/Journal.hs
index d544559a0..29253bb6f 100644
--- a/hledger-lib/Hledger/Data/Journal.hs
+++ b/hledger-lib/Hledger/Data/Journal.hs
@@ -435,10 +435,10 @@ checkBalanceAssertion (errs,bal) ps
     assertion = pbalanceassertion p
     Just assertedbal = assertion
     bal' = sum $ [bal] ++ map pamount ps
-    err = printf "Balance assertion failed for account %s on %s\n%safter\n   %s\nexpected balance is %s, actual balance was %s."
+    err = printf "Balance assertion failed for account %s on %s\n%sAfter posting:\n   %s\nexpected balance is %s, actual balance was %s."
                  (paccount p)
                  (show $ postingDate p)
-                 (maybe "" (("In\n"++).show) $ ptransaction p)
+                 (maybe "" (("In transaction:\n"++).show) $ ptransaction p)
                  (show p)
                  (showMixedAmount assertedbal)
                  (showMixedAmount bal')