diff options
| author | Mark Lentczner <markl@glyphic.com> | 2010-04-25 05:38:35 +0000 |
|---|---|---|
| committer | Mark Lentczner <markl@glyphic.com> | 2010-04-25 05:38:35 +0000 |
| commit | a70355a145e182bd1963ab707472dffb75f663bb (patch) | |
| tree | 856789edef8fd979375e49bb1db336da717cf065 /src/Haddock | |
| parent | ade9353458bb9070cedbf4853dc2a28a91fbb238 (diff) | |
remove unused bodyBox
Diffstat (limited to 'src/Haddock')
| -rw-r--r-- | src/Haddock/Backends/Xhtml/Layout.hs | 3 |
1 files changed, 0 insertions, 3 deletions
diff --git a/src/Haddock/Backends/Xhtml/Layout.hs b/src/Haddock/Backends/Xhtml/Layout.hs index 8f9e83e5..ce035c24 100644 --- a/src/Haddock/Backends/Xhtml/Layout.hs +++ b/src/Haddock/Backends/Xhtml/Layout.hs @@ -80,9 +80,6 @@ maybeRDocBox Nothing = rdocBox (noHtml) maybeRDocBox (Just doc) = rdocBox (docToHtml doc) -bodyBox :: Html -> HtmlTable -bodyBox html = tda [theclass "body"] << vanillaTable << html - -- a vanilla table has width 100%, no border, no padding, no spacing vanillaTable, vanillaTable2 :: Html -> Html vanillaTable = table ! [theclass "vanilla", cellspacing 0, cellpadding 0] |