diff options
| author | David Waern <david.waern@gmail.com> | 2007-11-11 02:41:53 +0000 |
|---|---|---|
| committer | David Waern <david.waern@gmail.com> | 2007-11-11 02:41:53 +0000 |
| commit | ab036c7617982c513f2d820ae9076c381453f491 (patch) | |
| tree | 476a4168edacf1035dd9ba821dd8e0e0d4cf5324 /src/Haddock/Backends/Html.hs | |
| parent | 958009558fca718183f23f920118b966a13ef63b (diff) | |
Fix conflicts
Diffstat (limited to 'src/Haddock/Backends/Html.hs')
| -rw-r--r-- | src/Haddock/Backends/Html.hs | 6 |
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 |