From 6dc0ea4e4a7ef7875d29aefc745cc539a9539c10 Mon Sep 17 00:00:00 2001 From: David Waern Date: Tue, 4 Nov 2008 23:20:17 +0000 Subject: Follow change to ExportDecl in frames code --- src/Haddock/Backends/Html.hs | 2 +- tests/output/A.html | 2 ++ tests/output/A.html.ref | 2 ++ tests/output/B.html | 2 ++ tests/output/B.html.ref | 2 ++ tests/output/Bug1.html | 2 ++ tests/output/Bug1.html.ref | 2 ++ tests/output/Bug2.html | 2 ++ tests/output/Bug2.html.ref | 2 ++ tests/output/Bug3.html | 2 ++ tests/output/Bug3.html.ref | 2 ++ tests/output/Bug4.html | 2 ++ tests/output/Bug4.html.ref | 2 ++ tests/output/Bug6.html | 2 ++ tests/output/Bug6.html.ref | 2 ++ tests/output/Bug7.html | 2 ++ tests/output/Bug7.html.ref | 2 ++ tests/output/Bug8.html | 2 ++ tests/output/Bug8.html.ref | 2 ++ tests/output/Bugs.html | 2 ++ tests/output/Hash.html | 2 ++ tests/output/Hash.html.ref | 2 ++ tests/output/NoLayout.html | 2 ++ tests/output/NoLayout.html.ref | 2 ++ tests/output/Test.html | 2 ++ tests/output/Test.html.ref | 2 ++ tests/output/TypeOperators.html | 2 ++ tests/output/TypeOperators.html.ref | 2 ++ tests/output/Visible.html | 2 ++ tests/output/Visible.html.ref | 2 ++ tests/tests/A.html.ref | 2 ++ tests/tests/B.html.ref | 2 ++ tests/tests/Bug1.html.ref | 2 ++ tests/tests/Bug2.html.ref | 2 ++ tests/tests/Bug3.html.ref | 2 ++ tests/tests/Bug4.html.ref | 2 ++ tests/tests/Bug6.html.ref | 2 ++ tests/tests/Bug7.html.ref | 2 ++ tests/tests/Bug8.html.ref | 2 ++ tests/tests/Bugs.html.ref | 2 ++ tests/tests/Hash.html.ref | 2 ++ tests/tests/NamedDoc.html.ref | 2 ++ tests/tests/NoLayout.html.ref | 2 ++ tests/tests/TH.hs | 8 -------- tests/tests/TH2.hs | 7 ------- tests/tests/Test.html.ref | 2 ++ tests/tests/Ticket61.html.ref | 2 ++ tests/tests/TypeFamilies.html.ref | 2 ++ tests/tests/TypeOperators.html.ref | 2 ++ tests/tests/Visible.html.ref | 2 ++ 50 files changed, 95 insertions(+), 16 deletions(-) delete mode 100644 tests/tests/TH.hs delete mode 100644 tests/tests/TH2.hs diff --git a/src/Haddock/Backends/Html.hs b/src/Haddock/Backends/Html.hs index f44b6fb6..a89a9b20 100644 --- a/src/Haddock/Backends/Html.hs +++ b/src/Haddock/Backends/Html.hs @@ -656,7 +656,7 @@ miniSynopsis mod iface = exports = numberSectionHeadings (ifaceRnExportItems iface) processForMiniSynopsis :: Module -> ExportItem DocName -> Html -processForMiniSynopsis mod (ExportDecl (L _loc decl0) _doc _insts) = +processForMiniSynopsis mod (ExportDecl (L _loc decl0) _doc _ _insts) = thediv ! [theclass "decl" ] << case decl0 of TyClD d@(TyFamily{}) -> ppTyFamHeader True False d diff --git a/tests/output/A.html b/tests/output/A.html index 9fd52d04..3a9d46a0 100644 --- a/tests/output/A.html +++ b/tests/output/A.html @@ -8,6 +8,8 @@ >