From 8871af09420160e7ca770c0ab72d8b7f6be70380 Mon Sep 17 00:00:00 2001
From: Tobias Brandt <tob.brandt@gmail.com>
Date: Fri, 27 Aug 2010 15:50:28 +0000
Subject: adding support for local and relative name qualification

---
 src/Haddock/Options.hs | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'src/Haddock/Options.hs')

diff --git a/src/Haddock/Options.hs b/src/Haddock/Options.hs
index 6e590201..71a5fd85 100644
--- a/src/Haddock/Options.hs
+++ b/src/Haddock/Options.hs
@@ -36,6 +36,7 @@ import Distribution.Verbosity
 import Haddock.Utils
 import Haddock.Types
 import System.Console.GetOpt
+import qualified Data.Char as Char
 
 
 data Flag
@@ -123,7 +124,8 @@ options backwardsCompat =
     Option ['t']  ["title"]    (ReqArg Flag_Heading "TITLE")
       "page heading",
     Option ['q']  ["qual"] (ReqArg Flag_Qualification "QUALI")
-      "qualification of names, either \n'none' (default) or 'full'",
+      "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)
-- 
cgit v1.2.3