aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--doc/haddock.xml14
-rw-r--r--src/Haddock/Options.hs3
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)