aboutsummaryrefslogtreecommitdiff
path: root/src/Haddock/Backends
diff options
context:
space:
mode:
authorSimon Peyton Jones <simonpj@microsoft.com>2012-03-17 01:04:05 +0000
committerSimon Peyton Jones <simonpj@microsoft.com>2012-03-17 01:04:05 +0000
commit730d3e622268f59fd78d29026d164486c4e68fcb (patch)
treef8a90fb0ed278712c97f0837c395f63d2ed64b79 /src/Haddock/Backends
parent82851383b1477d6a119b289a405363437485b099 (diff)
parentcc86b10577d0dcecd5c86102cb601caa474d3d6a (diff)
Merge branch 'master' of http://darcs.haskell.org//haddock
Conflicts: src/Haddock/Convert.hs
Diffstat (limited to 'src/Haddock/Backends')
-rw-r--r--src/Haddock/Backends/Xhtml/Decl.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Haddock/Backends/Xhtml/Decl.hs b/src/Haddock/Backends/Xhtml/Decl.hs
index 71bcd581..28955c22 100644
--- a/src/Haddock/Backends/Xhtml/Decl.hs
+++ b/src/Haddock/Backends/Xhtml/Decl.hs
@@ -164,7 +164,7 @@ ppTyFamHeader summary associated decl unicode qual =
ppTyClBinderWithVars summary decl <+>
case tcdKindSig decl of
- Just kind -> dcolon unicode <+> ppLKind unicode qual kind
+ Just (HsBSig kind _) -> dcolon unicode <+> ppLKind unicode qual kind
Nothing -> noHtml