From 4637e5b018d8098cbce3911fc0cda00b750871b1 Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Fri, 24 Jun 2011 01:30:16 +0000
Subject: [PATCH] keep haddock happy

---
 hledger/Hledger/Cli/Register.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/hledger/Hledger/Cli/Register.hs b/hledger/Hledger/Cli/Register.hs
index de18e19bd..e81f6756a 100644
--- a/hledger/Hledger/Cli/Register.hs
+++ b/hledger/Hledger/Cli/Register.hs
@@ -111,8 +111,8 @@ balancelabel = "Balance"
 accountRegisterReport :: [Opt] -> Journal -> Matcher -> Matcher -> RegisterReport2
 accountRegisterReport opts j m thisacctmatcher = (label, items)
  where
-      -- | interval == NoInterval = items
-      -- | otherwise              = summarisePostingsByInterval interval depth empty filterspan displayps
+      -- interval == NoInterval = items
+      -- otherwise              = summarisePostingsByInterval interval depth empty filterspan displayps
 
      -- transactions affecting this account, in date order
      ts = sortBy (comparing tdate) $ filter (matchesTransaction thisacctmatcher) $ jtxns j