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"
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