From 95f909543a294b168c5951ab1ab3b5130d7ee2dd Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Sat, 1 Jun 2013 13:55:34 -0700
Subject: [PATCH] fix a haddock failure reported by hydra

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

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