aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Backends/HH.hs
diff options
context:
space:
mode:
authorMark Lentczner <markl@glyphic.com>2010-07-19 05:20:53 +0000
committerMark Lentczner <markl@glyphic.com>2010-07-19 05:20:53 +0000
commitd3ebf5f25ead73877b38302cbe8b1ed13e993917 (patch)
treec185060caab9a83c4fc0d41324bb90f26a7907b0 /src/Haddock/Backends/HH.hs
parenta7aad74a978e2e1d313c23863c7a91983bbc4848 (diff)
refactoring of anchor ID and fragment handling
Diffstat (limited to 'src/Haddock/Backends/HH.hs')
-rw-r--r--src/Haddock/Backends/HH.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Backends/HH.hs b/src/Haddock/Backends/HH.hs
index 39390573..7f58fd02 100644
--- a/src/Haddock/Backends/HH.hs
+++ b/src/Haddock/Backends/HH.hs
@@ -125,7 +125,7 @@ ppHHIndex odir maybe_package ifaces = do
ppReference name [] = empty
ppReference name (Module mdl:refs) =
- text "<PARAM name=\"Local\" value=\"" <> text (nameHtmlRef mdl name) <> text "\">" $$
+ text "<PARAM name=\"Local\" value=\"" <> text (moduleNameURL mdl name) <> text "\">" $$
ppReference name refs