aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorDavid Waern <davve@dtek.chalmers.se>2007-09-29 14:02:26 +0000
committerDavid Waern <davve@dtek.chalmers.se>2007-09-29 14:02:26 +0000
commite390c635fc817df5da56c67a72988fe77f2b0318 (patch)
tree41a8ec2ef5843215af0bfdb0ba6d72b083a57ae6 /src
parent4866f38861d7ebc578dcc5754e40b51fffca8b2f (diff)
Use isSymOcc from OccName instead of isConSym
Diffstat (limited to 'src')
-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 d3e4478c..e0bf0d20 100644
--- a/src/Haddock/Backends/Html.hs
+++ b/src/Haddock/Backends/Html.hs
@@ -1125,10 +1125,10 @@ ppDataHead :: Bool -> Name -> [Name] -> Html
ppDataHead summary name tyvars
-- (a :+: b) c d
- | isConSym name && length tyvars > 2 = parens first2 <+> rest
+ | isNameSymOcc name && length tyvars > 2 = parens first2 <+> rest
-- a :+: b
- | isConSym name = first2
+ | isNameSymOcc name = first2
-- Would like a case for:
-- a `O` b