diff --git a/src/Main.hs b/src/Main.hs index 2f0c72caca510aa4d130751ef4d8a7faa44c51a6..0c2633dee024287405fd22242d2544c1edabefea 100644 --- a/src/Main.hs +++ b/src/Main.hs @@ -194,10 +194,10 @@ render flags interfaces = do ppHtmlHelpFiles title packageName visibleMods odir maybe_html_help_format [] when (Flag_GenContents `elem` flags) $ do - ppHtmlContents odir title packageName maybe_html_help_format - maybe_index_url maybe_source_urls maybe_wiki_urls - visibleMods True prologue - copyHtmlBits odir libdir css_file + ppHtmlContents odir title packageName maybe_html_help_format + maybe_index_url maybe_source_urls maybe_wiki_urls + visibleMods True prologue + copyHtmlBits odir libdir css_file when (Flag_Html `elem` flags) $ do ppHtml title packageName visibleMods odir