[commit: haddock] ghc-head, master, wip/T14529, 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, wip/ttg6-unrevert-2017-11-22: Copy quickjump.css for nicer error messages (75c784e)

[git at git.haskell.org]

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

On branches: ghc-head,master,wip/T14529,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,wip/ttg6-unrevert-2017-11-22
Link       : http://git.haskell.org/haddock.git/commitdiff/75c784e474bd1fc824e2f0214f37908d0d4410c3

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

commit 75c784e474bd1fc824e2f0214f37908d0d4410c3
Author: alexbiehl <alex.biehl at gmail.com>
Date:   Tue Oct 31 20:59:07 2017 +0100

    Copy quickjump.css for nicer error messages


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

75c784e474bd1fc824e2f0214f37908d0d4410c3
 haddock-api/src/Haddock/Backends/Xhtml.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/haddock-api/src/Haddock/Backends/Xhtml.hs b/haddock-api/src/Haddock/Backends/Xhtml.hs
index 04a066a..d43de2a 100644
--- a/haddock-api/src/Haddock/Backends/Xhtml.hs
+++ b/haddock-api/src/Haddock/Backends/Xhtml.hs
@@ -110,9 +110,9 @@ copyHtmlBits odir libdir themes withQuickjump = do
     copyLibFile f = copyFile (joinPath [libhtmldir, f]) (joinPath [odir, f])
   mapM_ copyCssFile (cssFiles themes)
   copyLibFile haddockJsFile
-  when withQuickjump $ do
-    copyCssFile (joinPath [libhtmldir, quickJumpCssFile])
-    copyLibFile jsQuickJumpFile
+  copyCssFile (joinPath [libhtmldir, quickJumpCssFile])
+  when withQuickjump
+  	(copyLibFile jsQuickJumpFile)
   return ()