diff options
| author | Mark Lentczner <markl@glyphic.com> | 2010-07-16 20:12:39 +0000 |
|---|---|---|
| committer | Mark Lentczner <markl@glyphic.com> | 2010-07-16 20:12:39 +0000 |
| commit | d52487d1417080d45a800b1ceba71ed48b9582bb (patch) | |
| tree | 5a6e49a3786aac413c20f3bc0454a6d9642a2f70 /src/Haddock/Backends/Xhtml/Layout.hs | |
| parent | 7832c8030a203510b89bd13fdc98eaf7279eb172 (diff) | |
new output for mini_ pages
Diffstat (limited to 'src/Haddock/Backends/Xhtml/Layout.hs')
| -rw-r--r-- | src/Haddock/Backends/Xhtml/Layout.hs | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Haddock/Backends/Xhtml/Layout.hs b/src/Haddock/Backends/Xhtml/Layout.hs index 86e75740..d7f9c1c8 100644 --- a/src/Haddock/Backends/Xhtml/Layout.hs +++ b/src/Haddock/Backends/Xhtml/Layout.hs @@ -11,6 +11,8 @@ -- Portability : portable ----------------------------------------------------------------------------- module Haddock.Backends.Xhtml.Layout ( + miniBody, + divPackageHeader, divModuleHeader, divFooter, divTableOfContents, divDescription, divSynposis, divInterface, @@ -46,6 +48,9 @@ import GHC -- Sections of the document +miniBody :: Html -> Html +miniBody = body ! [identifier "mini"] + divPackageHeader, divModuleHeader, divFooter :: Html -> Html divPackageHeader = thediv ! [identifier "package-header"] divModuleHeader = thediv ! [identifier "module-header"] |