[commit: haddock] v2.17: Quick-fix addressing the synopsis-pane regression (7e9b004)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/haddock

On branch  : v2.17
Link       : http://git.haskell.org/haddock.git/commitdiff/7e9b004b00368fc2819c9d90f66c0d5323f13e75

>---------------------------------------------------------------

commit 7e9b004b00368fc2819c9d90f66c0d5323f13e75
Author: Alex Biehl <alexbiehl at gmail.com>
Date:   Wed Apr 12 15:46:25 2017 +0200

    Quick-fix addressing the synopsis-pane regression
    
    This addresses/workarounds #599 with the least effort.


>---------------------------------------------------------------

7e9b004b00368fc2819c9d90f66c0d5323f13e75
 haddock-api/src/Haddock/Backends/Xhtml.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/haddock-api/src/Haddock/Backends/Xhtml.hs b/haddock-api/src/Haddock/Backends/Xhtml.hs
index 0958c2c..e309998 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml.hs
@@ -172,7 +172,7 @@ bodyHtml doctitle iface
            maybe_source_url maybe_wiki_url
            maybe_contents_url maybe_index_url
            pageContent =
-  body << [
+  body ! [theclass "no-frame"] << [
     divPackageHeader << [
       unordList (catMaybes [
         srcButton maybe_source_url iface,