note that getCliOpts, debugArgs api fns are unused

This commit is contained in:
Simon Michael 2013-12-07 06:10:45 -08:00
parent 8261ac0f56
commit 5bdc55ab77

View File

@ -722,6 +722,8 @@ showModeHelp =
.
(helpText [] HelpFormatDefault :: Mode a -> [Text])
-- not used:
-- | Print debug info about arguments and options if --debug is present.
debugArgs :: [String] -> CliOpts -> IO ()
debugArgs args opts =
@ -733,6 +735,8 @@ debugArgs args opts =
d <- getCurrentDay
putStrLn $ "search query: " ++ (show $ queryFromOpts d $ reportopts_ opts)
-- not used:
-- | Parse hledger CLI options from the command line using the given
-- cmdargs mode, and either return them or, if a help flag is present,
-- print the mode help and exit the program.