slaesvuo/hledger
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

a --debug option, not hooked up to anything yet

Browse Source
This commit is contained in:
Simon Michael 2009-03-15 06:15:58 +00:00
parent eed76e3722
commit 4a7a724f0a
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
Options.hs
View File

@ -79,6 +79,7 @@ options = [
,Option ['h'] ["help"] (NoArg Help) "show this help" ,Option ['h'] ["help"] (NoArg Help) "show this help"
,Option ['v'] ["verbose"] (NoArg Verbose) "verbose test output" ,Option ['v'] ["verbose"] (NoArg Verbose) "verbose test output"
,Option ['V'] ["version"] (NoArg Version) "show version" ,Option ['V'] ["version"] (NoArg Version) "show version"
,Option [] ["debug"] (NoArg Debug) "debug output"
,Option [] ["debug-no-ui"] (NoArg DebugNoUI) "run ui commands without no output" ,Option [] ["debug-no-ui"] (NoArg DebugNoUI) "run ui commands without no output"
] ]
where where
@ -105,6 +106,7 @@ data Opt =
Help | Help |
Verbose | Verbose |
Version Version
| Debug
| DebugNoUI | DebugNoUI
deriving (Show,Eq) deriving (Show,Eq)