command like processing for theme selection

  The bulk of the change is threadnig the selected theme set through functions
  in Xhtml.hs so that the selected themes can be used when generating the page
  output. There isn't much going on in most of these changes, just passing it
  along. The real work is all done in Themes.hs.

1 files changed, 8 insertions, 2 deletions

diff --git a/src/Haddock/Options.hs b/src/Haddock/Options.hs
index 132a5e52..4ea2db5e 100644
--- a/src/Haddock/Options.hs
+++ b/src/Haddock/Options.hs
@@ -42,6 +42,7 @@ data Flag
   | Flag_Debug
 --  | Flag_DocBook
   | Flag_ReadInterface String
+  | Flag_DefaultThemes
   | Flag_DumpInterface String
   | Flag_Heading String
   | Flag_Html
@@ -52,6 +53,7 @@ data Flag
   | Flag_SourceBaseURL   String
   | Flag_SourceModuleURL String
   | Flag_SourceEntityURL String
+  | Flag_Themes String
   | Flag_WikiBaseURL   String
   | Flag_WikiModuleURL String
   | Flag_WikiEntityURL String
@@ -111,8 +113,12 @@ 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 "FILE")
-      "the CSS file to use for HTML output",
+    Option ['c']  ["css"]         (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",
     Option ['p']  ["prologue"] (ReqArg Flag_Prologue "FILE")
       "file containing prologue text",
     Option ['t']  ["title"]    (ReqArg Flag_Heading "TITLE")