From e37cef7364006392a073cc4f6601078829f2dbec Mon Sep 17 00:00:00 2001 From: Mark Lentczner Date: Fri, 23 Jul 2010 06:58:31 +0000 Subject: drop --themes support, add named theme support decided that --themes was silly - no one would do that, just use multiple --theme arguments made --theme a synonym for --css and -c made those arguments, if no file is found, look up the argument as the name of a built in theme all of this let's haddock be invoked with "--theme=classic" for example. --- src/Haddock/Options.hs | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) (limited to 'src/Haddock/Options.hs') diff --git a/src/Haddock/Options.hs b/src/Haddock/Options.hs index 4ea2db5e..0e2e244b 100644 --- a/src/Haddock/Options.hs +++ b/src/Haddock/Options.hs @@ -53,7 +53,6 @@ data Flag | Flag_SourceBaseURL String | Flag_SourceModuleURL String | Flag_SourceEntityURL String - | Flag_Themes String | Flag_WikiBaseURL String | Flag_WikiModuleURL String | Flag_WikiEntityURL String @@ -113,12 +112,10 @@ options backwardsCompat = "URL for a comments link for each module\n(using the %{MODULE} var)", Option [] ["comments-entity"] (ReqArg Flag_WikiEntityURL "URL") "URL for a comments link for each entity\n(using the %{FILE}, %{MODULE}, %{NAME},\n%{KIND} or %{LINE} vars)", - Option ['c'] ["css"] (ReqArg Flag_CSS "PATH") + Option ['c'] ["css", "theme"] (ReqArg Flag_CSS "PATH") "the CSS file or theme directory to use for HTML output", - Option [] ["themes"] (ReqArg Flag_Themes "DIR") - "a directory of CSS files or themes to use for HTML output", Option [] ["default-themes"] (NoArg Flag_DefaultThemes) - "include all the available haddock themes", + "include all the built-in haddock themes", Option ['p'] ["prologue"] (ReqArg Flag_Prologue "FILE") "file containing prologue text", Option ['t'] ["title"] (ReqArg Flag_Heading "TITLE") -- cgit v1.2.3