diff options
author | David Waern <david.waern@gmail.com> | 2012-02-04 03:07:51 +0100 |
---|---|---|
committer | David Waern <david.waern@gmail.com> | 2012-02-04 03:07:51 +0100 |
commit | 80e2f0460ea89fe5eeb4c389d76ea55a464b2e63 (patch) | |
tree | 4b7eedbc59251b2aee91743c07141b12103f433e /src/Haddock | |
parent | 5e0812943b3da5952e9c50fb93f6079cb9f1c858 (diff) |
Style police.
Diffstat (limited to 'src/Haddock')
-rw-r--r-- | src/Haddock/Backends/Xhtml/Layout.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Haddock/Backends/Xhtml/Layout.hs b/src/Haddock/Backends/Xhtml/Layout.hs index da17552c..3ddbd28b 100644 --- a/src/Haddock/Backends/Xhtml/Layout.hs +++ b/src/Haddock/Backends/Xhtml/Layout.hs @@ -67,8 +67,8 @@ sectionName :: Html -> Html sectionName = paragraph ! [theclass "caption"] --- | Make an element that always has at least something (a non-breaking space) --- If it would have otherwise been empty, then give it the class ".empty" +-- | Make an element that always has at least something (a non-breaking space). +-- If it would have otherwise been empty, then give it the class ".empty". nonEmptySectionName :: Html -> Html nonEmptySectionName c | isNoHtml c = paragraph ! [theclass "caption empty"] $ spaceHtml |