@@ -160,7 +160,7 @@ normalizeMaintainer x
160160 | "self.stdenv.lib.maintainers." `isPrefixOf` x = drop 28 x
161161 | otherwise = x
162162
163−data CliOption = PrintHelp | Verbose | HackageDB FilePath
163+data CliOption = PrintHelp | Verbose
164164 deriving (Eq)
165165
166166main :: IO ()
@@ -169,7 +169,6 @@ main = bracket (return ()) (\() -> hFlush stdout >> hFlush stderr) $ \() -> do
169169 options =
170170 [ Option ['h'] ["help"] (NoArg PrintHelp) "show this help text"
171171 , Option ['v'] ["verbose"] (NoArg Verbose) "enable noisy debug output"
172− , Option [] ["hackage"] (ReqArg HackageDB "HACKAGE-DIR") "path to hackage database"
173172 ]
174173
175174 usage :: String