diff options
Diffstat (limited to 'git-annex.hs')
-rw-r--r-- | git-annex.hs | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/git-annex.hs b/git-annex.hs index 6c143972a..110054fd5 100644 --- a/git-annex.hs +++ b/git-annex.hs @@ -7,6 +7,7 @@ import System.Environment +import qualified GitRepo as Git import CmdLine import Command import Options @@ -58,7 +59,11 @@ cmds = concat , Command.Find.command ] +header :: String +header = "Usage: git-annex command [option ..]" + main :: IO () main = do args <- getArgs - dispatch args cmds commonOptions "Usage: git-annex command [option ..]" + gitrepo <- Git.repoFromCwd + dispatch gitrepo args cmds commonOptions header |