aboutsummaryrefslogtreecommitdiff
path: root/src/Main.hs
diff options
context:
space:
mode:
authorMark Lentczner <markl@glyphic.com>2010-07-22 06:43:32 +0000
committerMark Lentczner <markl@glyphic.com>2010-07-22 06:43:32 +0000
commitaaa55d835f3adeb38b4d811b1ef70bcd78c8ee0c (patch)
treee19d7a5eebb02349625888af39312c13a58f733c /src/Main.hs
parent7e2afa2b0d80759066fd872bc6900c59534b0b46 (diff)
remove --html-help support - it was old, out-of-date, and mostly missing
Diffstat (limited to 'src/Main.hs')
-rw-r--r--src/Main.hs10
1 files changed, 3 insertions, 7 deletions
diff --git a/src/Main.hs b/src/Main.hs
index f75dcad9..40b1d42a 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -179,7 +179,6 @@ render flags ifaces installedIfaces = do
opt_wiki_urls = optWikiUrls flags
opt_contents_url = optContentsUrl flags
opt_index_url = optIndexUrl flags
- opt_html_help_format = optHtmlHelpFormat flags
css_file = optCssFile flags
odir = outputDir flags
opt_latex_style = optLaTeXStyle flags
@@ -198,23 +197,20 @@ render flags ifaces installedIfaces = do
prologue <- getPrologue flags
when (Flag_GenIndex `elem` flags) $ do
- ppHtmlIndex odir title packageStr opt_html_help_format
+ ppHtmlIndex odir title packageStr
opt_contents_url opt_source_urls opt_wiki_urls
allVisibleIfaces
copyHtmlBits odir libDir css_file
- when (Flag_GenContents `elem` flags && Flag_GenIndex `elem` flags) $
- ppHtmlHelpFiles title packageStr visibleIfaces odir opt_html_help_format []
-
when (Flag_GenContents `elem` flags) $ do
- ppHtmlContents odir title packageStr opt_html_help_format
+ ppHtmlContents odir title packageStr
opt_index_url opt_source_urls opt_wiki_urls
allVisibleIfaces True prologue
copyHtmlBits odir libDir css_file
when (Flag_Html `elem` flags) $ do
ppHtml title packageStr visibleIfaces odir
- prologue opt_html_help_format
+ prologue
opt_source_urls opt_wiki_urls
opt_contents_url opt_index_url unicode
copyHtmlBits odir libDir css_file