aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorDavid Waern <david.waern@gmail.com>2009-03-27 21:21:46 +0000
committerDavid Waern <david.waern@gmail.com>2009-03-27 21:21:46 +0000
commita46e711c848adf52fb07b62d2fa110d769dfed80 (patch)
treec684db91fe9e047da788f39677d31ba836e09980 /src
parent2265cf668d9604d407a06e11df804fc73242de00 (diff)
Use docNameOcc instead of nameOccName . getName
Diffstat (limited to 'src')
-rw-r--r--src/Haddock/Backends/Html.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Backends/Html.hs b/src/Haddock/Backends/Html.hs
index ee6e49e9..34b367de 100644
--- a/src/Haddock/Backends/Html.hs
+++ b/src/Haddock/Backends/Html.hs
@@ -787,7 +787,7 @@ ppFunSig summary links loc mbDoc docname typ =
ppTypeOrFunSig summary links loc docname typ mbDoc
(ppTypeSig summary occname typ, ppBinder False occname, dcolon)
where
- occname = nameOccName . getName $ docname
+ occname = docNameOcc docname
ppTypeOrFunSig :: Bool -> LinksInfo -> SrcSpan -> DocName -> HsType DocName ->
Maybe (HsDoc DocName) -> (Html, Html, Html) -> HtmlTable