diff --git a/hledger-lib/Hledger/Data/Journal.hs b/hledger-lib/Hledger/Data/Journal.hs
index b35b9196f..be5569da8 100644
--- a/hledger-lib/Hledger/Data/Journal.hs
+++ b/hledger-lib/Hledger/Data/Journal.hs
@@ -391,8 +391,9 @@ checkBalanceAssertion :: ([String],MixedAmount) -> [Posting] -> ([String],MixedA
 checkBalanceAssertion (errs,bal) ps
   | null ps = (errs,bal)
   | isNothing assertion = (errs,bal)
-  -- | bal' /= assertedbal  -- MixedAmount's Eq instance currently gets confused by different precisions
-  | not $ isReallyZeroMixedAmount (bal' - assertedbal)
+  |
+    -- bal' /= assertedbal  -- MixedAmount's Eq instance currently gets confused by different precisions
+    not $ isReallyZeroMixedAmount (bal' - assertedbal)
       = (errs++[err], bal')
   | otherwise = (errs,bal')
   where