[commit: haddock] ghc-head, ghc-head1, master, wip/revert-ttg-2017-11-20, wip/ttg-2017-11-06, wip/ttg2-2017-11-10, wip/ttg3-2017-11-12, wip/ttg4-constraints-2017-11-13: Load javascript below the fold (57f25f2)

git at git.haskell.org git at git.haskell.org
Mon Nov 20 21:10:28 UTC 2017


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

On branches: ghc-head,ghc-head1,master,wip/revert-ttg-2017-11-20,wip/ttg-2017-11-06,wip/ttg2-2017-11-10,wip/ttg3-2017-11-12,wip/ttg4-constraints-2017-11-13
Link       : http://git.haskell.org/haddock.git/commitdiff/57f25f23ffea2f36c0361a5155a8329c342b78da

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

commit 57f25f23ffea2f36c0361a5155a8329c342b78da
Author: alexbiehl <alex.biehl at gmail.com>
Date:   Mon Aug 28 18:47:43 2017 +0200

    Load javascript below the fold


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

57f25f23ffea2f36c0361a5155a8329c342b78da
 haddock-api/src/Haddock/Backends/Xhtml.hs | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/haddock-api/src/Haddock/Backends/Xhtml.hs b/haddock-api/src/Haddock/Backends/Xhtml.hs
index e1bbee7..0297f9e 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml.hs
@@ -121,9 +121,6 @@ headHtml docTitle themes mathjax_url =
     thetitle << docTitle,
     styleSheet themes,
     script ! [src jsFile, thetype "text/javascript"] << noHtml,
-    script ! [src jsPreactFile, thetype "text/javascript"] << noHtml,
-    script ! [src jsFuseFile, thetype "text/javascript"] << noHtml,
-    script ! [src jsIndexFile, thetype "text/javascript"] << noHtml,
     script ! [src mjUrl, thetype "text/javascript"] << noHtml,
     script ! [thetype "text/javascript"]
         -- NB: Within XHTML, the content of script tags needs to be
@@ -193,9 +190,12 @@ bodyHtml doctitle iface
       "Produced by " +++
       (anchor ! [href projectUrl] << toHtml projectName) +++
       (" version " ++ projectVersion)
-      )
-    ]
+      ),
 
+    script ! [src jsPreactFile, thetype "text/javascript"] << noHtml,
+    script ! [src jsFuseFile, thetype "text/javascript"] << noHtml,
+    script ! [src jsIndexFile, thetype "text/javascript"] << noHtml
+    ]
 
 moduleInfo :: Interface -> Html
 moduleInfo iface =



More information about the ghc-commits mailing list