diff options
-rw-r--r-- | doc/haddock.xml | 14 | ||||
-rw-r--r-- | src/Haddock/Options.hs | 3 |
2 files changed, 0 insertions, 17 deletions
diff --git a/doc/haddock.xml b/doc/haddock.xml index 461d01d3..d4d4c199 100644 --- a/doc/haddock.xml +++ b/doc/haddock.xml @@ -843,20 +843,6 @@ $ pdflatex <replaceable>package</replaceable>.tex</screen> <varlistentry> <term> - <indexterm><primary><option>-d</option></primary></indexterm> - <option>-d</option> - </term> - <term> - <indexterm><primary><option>--debug</option></primary></indexterm> - <option>--debug</option> - </term> - <listitem> - <para>Produce extra debugging output.</para> - </listitem> - </varlistentry> - - <varlistentry> - <term> <indexterm><primary><option>-?</option></primary></indexterm> <option>-?</option> </term> diff --git a/src/Haddock/Options.hs b/src/Haddock/Options.hs index 8e6c9ba9..9a08eb84 100644 --- a/src/Haddock/Options.hs +++ b/src/Haddock/Options.hs @@ -42,7 +42,6 @@ import qualified Data.Char as Char data Flag = Flag_BuiltInThemes | Flag_CSS String - | Flag_Debug -- | Flag_DocBook | Flag_ReadInterface String | Flag_DumpInterface String @@ -126,8 +125,6 @@ options backwardsCompat = "page heading", Option ['q'] ["qual"] (ReqArg Flag_Qualification "QUALI") "qualification of names, one of \n'none' (default), 'full', 'local'\nor 'relative'", - Option ['d'] ["debug"] (NoArg Flag_Debug) - "extra debugging output", Option ['?'] ["help"] (NoArg Flag_Help) "display this help and exit", Option ['V'] ["version"] (NoArg Flag_Version) |