From 42ca7958d6be63086d259b7856b2e1df554f964a Mon Sep 17 00:00:00 2001 From: lyxia Date: Fri, 10 Nov 2017 10:17:49 -0500 Subject: [PATCH 1/2] Hide instances by default (#698) --- haddock-api/src/Haddock/Backends/Xhtml/Layout.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs b/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs index 25d8b07a30..f171f8ddb3 100644 --- a/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs +++ b/haddock-api/src/Haddock/Backends/Xhtml/Layout.hs @@ -203,7 +203,7 @@ subInstances :: Maybe Package -> Qualification -> [(SubDecl, Maybe Module, Located DocName)] -> Html subInstances pkg qual nm lnks splice = maybe noHtml wrap . instTable where - wrap contents = subSection (hdr +++ collapseDetails id_ DetailsOpen (summary +++ contents)) + wrap contents = subSection (hdr +++ collapseDetails id_ DetailsClosed (summary +++ contents)) instTable = subTableSrc pkg qual lnks splice subSection = thediv ! [theclass "subs instances"] hdr = h4 ! collapseControl id_ "instances" << "Instances" From 3430971dbb6c59dc9e5486536021bd73211a1109 Mon Sep 17 00:00:00 2001 From: lyxia Date: Fri, 10 Nov 2017 11:49:16 -0500 Subject: [PATCH 2/2] Update tests with instance lists collapsed by default --- html-test/ref/Bug26.html | 2 +- html-test/ref/Bug294.html | 8 ++++---- html-test/ref/Bug548.html | 2 +- html-test/ref/Bug613.html | 4 ++-- html-test/ref/Bug679.html | 4 ++-- html-test/ref/Bug7.html | 4 ++-- html-test/ref/Hash.html | 2 +- html-test/ref/HiddenInstances.html | 4 ++-- html-test/ref/HiddenInstancesB.html | 4 ++-- html-test/ref/Instances.html | 12 ++++++------ html-test/ref/OrphanInstancesClass.html | 2 +- html-test/ref/OrphanInstancesType.html | 2 +- html-test/ref/QuasiExpr.html | 4 ++-- .../ref/SpuriousSuperclassConstraints.html | 2 +- html-test/ref/Test.html | 2 +- html-test/ref/TypeFamilies.html | 18 +++++++++--------- html-test/ref/TypeFamilies2.html | 6 +++--- html-test/ref/TypeFamilies3.html | 4 ++-- 18 files changed, 43 insertions(+), 43 deletions(-) diff --git a/html-test/ref/Bug26.html b/html-test/ref/Bug26.html index 2a316f2dfe..36de60b8dc 100644 --- a/html-test/ref/Bug26.html +++ b/html-test/ref/Bug26.html @@ -153,7 +153,7 @@ >

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details

Instances

Instances details