aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Backends
diff options
context:
space:
mode:
authorDavid Waern <david.waern@gmail.com>2007-11-11 02:41:53 +0000
committerDavid Waern <david.waern@gmail.com>2007-11-11 02:41:53 +0000
commitab036c7617982c513f2d820ae9076c381453f491 (patch)
tree476a4168edacf1035dd9ba821dd8e0e0d4cf5324 /src/Haddock/Backends
parent958009558fca718183f23f920118b966a13ef63b (diff)
Fix conflicts
Diffstat (limited to 'src/Haddock/Backends')
-rw-r--r--src/Haddock/Backends/Html.hs6
1 files changed, 2 insertions, 4 deletions
diff --git a/src/Haddock/Backends/Html.hs b/src/Haddock/Backends/Html.hs
index 40595eae..da57f4ea 100644
--- a/src/Haddock/Backends/Html.hs
+++ b/src/Haddock/Backends/Html.hs
@@ -484,10 +484,8 @@ ppHtmlIndex odir doctitle maybe_package maybe_html_help_format
[ if visible then
linkId mod (Just nm) << toHtml (moduleString mod)
else
- toHtml mdl
- | (Module mdl, visible) <- entries ])
-
- initialChars = [ 'A'..'Z' ] ++ ":!#$%&*+./<=>?@\\^|-~"
+ toHtml (moduleString mod)
+ | (mod, visible) <- entries ])
-- ---------------------------------------------------------------------------
-- Generate the HTML page for a module