aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNeil Mitchell <http://www.cs.york.ac.uk/~ndm/>2007-01-11 18:21:19 +0000
committerNeil Mitchell <http://www.cs.york.ac.uk/~ndm/>2007-01-11 18:21:19 +0000
commit958009558fca718183f23f920118b966a13ef63b (patch)
tree3ff9a8772c8aeffd80ae17152800cfb488b15e76
parentbf9d816e9df61c11670e2e09b3ddb41475a3bc1a (diff)
Delete more stuff that is no longer required
-rw-r--r--src/Haddock/Backends/Html.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Haddock/Backends/Html.hs b/src/Haddock/Backends/Html.hs
index 034c4db2..40595eae 100644
--- a/src/Haddock/Backends/Html.hs
+++ b/src/Haddock/Backends/Html.hs
@@ -484,8 +484,8 @@ ppHtmlIndex odir doctitle maybe_package maybe_html_help_format
[ if visible then
linkId mod (Just nm) << toHtml (moduleString mod)
else
- toHtml (moduleString mod)
- | (mod, visible) <- entries ])
+ toHtml mdl
+ | (Module mdl, visible) <- entries ])
initialChars = [ 'A'..'Z' ] ++ ":!#$%&*+./<=>?@\\^|-~"