keep haddock happy

2011-06-24 01:30:16 +00:00 · 2011-06-24 01:30:16 +00:00 · 4637e5b018
commit 4637e5b018
parent b165f796cc
1 changed files with 2 additions and 2 deletions
--- 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