Commit 94e87548 authored by Joachim Breitner's avatar Joachim Breitner
Browse files

Add an --internal flag to HaddockFlags

parent d35aa51f
......@@ -864,6 +864,7 @@ data HaddockFlags = HaddockFlags {
haddockHoogle :: Flag Bool,
haddockHtmlLocation :: Flag String,
haddockExecutables :: Flag Bool,
haddockInternal :: Flag Bool,
haddockCss :: Flag FilePath,
haddockHscolour :: Flag Bool,
haddockHscolourCss :: Flag FilePath,
......@@ -876,6 +877,7 @@ defaultHaddockFlags = HaddockFlags {
haddockHoogle = Flag False,
haddockHtmlLocation = NoFlag,
haddockExecutables = Flag False,
haddockInternal = Flag False,
haddockCss = NoFlag,
haddockHscolour = Flag False,
haddockHscolourCss = NoFlag,
......@@ -906,6 +908,11 @@ haddockCommand = makeCommand name shortDesc longDesc defaultHaddockFlags options
haddockExecutables (\v flags -> flags { haddockExecutables = v })
trueArg
,option "" ["internal"]
"Run haddock for internal modules and include all symbols"
haddockInternal (\v flags -> flags { haddockInternal = v })
trueArg
,option "" ["css"]
"Use PATH as the haddock stylesheet"
haddockCss (\v flags -> flags { haddockCss = v })
......@@ -930,6 +937,7 @@ instance Monoid HaddockFlags where
haddockHoogle = mempty,
haddockHtmlLocation = mempty,
haddockExecutables = mempty,
haddockInternal = mempty,
haddockCss = mempty,
haddockHscolour = mempty,
haddockHscolourCss = mempty,
......@@ -939,6 +947,7 @@ instance Monoid HaddockFlags where
haddockHoogle = combine haddockHoogle,
haddockHtmlLocation = combine haddockHtmlLocation,
haddockExecutables = combine haddockExecutables,
haddockInternal = combine haddockInternal,
haddockCss = combine haddockCss,
haddockHscolour = combine haddockHscolour,
haddockHscolourCss = combine haddockHscolourCss,
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment