diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-03-25 12:41:57 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-03-25 12:41:57 -0400 |
| commit | bf0af38ca4e69c83abd95a74379bd8bc672cd0e3 (patch) | |
| tree | 9fa20f0b4486d4286242f44cf68d7e94bd781aca /CmdLine.hs | |
| parent | 70912c45d126b06fe52890e26040bbd180f4f3d8 (diff) | |
make usage less terrifying
Need to make `git annex help command` show the options for that command.
Diffstat (limited to 'CmdLine.hs')
| -rw-r--r-- | CmdLine.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/CmdLine.hs b/CmdLine.hs index 0b155215d..489935453 100644 --- a/CmdLine.hs +++ b/CmdLine.hs @@ -45,7 +45,7 @@ dispatch fuzzyok allargs allcmds commonoptions fields header getgitrepo = do prepCommand cmd params tryRun state' cmd $ [startup] ++ actions ++ [shutdown $ cmdnocommit cmd] where - err msg = msg ++ "\n\n" ++ usage header allcmds commonoptions + err msg = msg ++ "\n\n" ++ usage header allcmds cmd = Prelude.head cmds (fuzzy, cmds, name, args) = findCmd fuzzyok allargs allcmds err (flags, params) = getOptCmd args cmd commonoptions err |