From 14b5d1ca3e1e2ee6bc5db925196b8dd7e48e45be Mon Sep 17 00:00:00 2001
From: Simon Michael <simon@joyful.com>
Date: Tue, 8 Jul 2014 11:49:34 -0700
Subject: [PATCH] web: fix a haddock breakage

---
 hledger-web/Handler/RegisterR.hs | 8 --------
 1 file changed, 8 deletions(-)

diff --git a/hledger-web/Handler/RegisterR.hs b/hledger-web/Handler/RegisterR.hs
index e0406b212..f58532458 100644
--- a/hledger-web/Handler/RegisterR.hs
+++ b/hledger-web/Handler/RegisterR.hs
@@ -79,14 +79,6 @@ registerItemsHtml _ vd (balancelabel,items) = [hamlet|
    \#{mixedAmountAsHtml amt}
  <td.balance style="text-align:right;">#{mixedAmountAsHtml bal}
 |]
- -- $else
- --  $forall p' <- tpostings t
- --   <tr.item.#{evenodd}.posting>
- --   <td.date>
- --   <td.description>
- --   <td.account>&nbsp;<a href="@?{accountUrl here $ paccount p'}" title="Show transactions in #{paccount p'}">#{elideRight 40 $ paccount p'}
- --    <td.amount style="text-align:right;">#{mixedAmountAsHtml $ pamount p'}
- --    <td.balance style="text-align:right;">
 
      where
        evenodd = if even n then "even" else "odd" :: String