diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2012-03-17 01:04:05 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2012-03-17 01:04:05 +0000 |
| commit | 730d3e622268f59fd78d29026d164486c4e68fcb (patch) | |
| tree | f8a90fb0ed278712c97f0837c395f63d2ed64b79 /src/Haddock/Backends/Xhtml | |
| parent | 82851383b1477d6a119b289a405363437485b099 (diff) | |
| parent | cc86b10577d0dcecd5c86102cb601caa474d3d6a (diff) | |
Merge branch 'master' of http://darcs.haskell.org//haddock
Conflicts:
src/Haddock/Convert.hs
Diffstat (limited to 'src/Haddock/Backends/Xhtml')
| -rw-r--r-- | src/Haddock/Backends/Xhtml/Decl.hs | 2 |
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 |