diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-12-08 14:07:49 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-12-08 14:07:49 -0400 |
| commit | 2099407d8aa1b1e94f29de0d9094ccfa6e05e471 (patch) | |
| tree | ad1aee35f7f5556cd3784c326732e852ecf23c1d /git-annex.hs | |
| parent | 627a3014376f83d613c448da929231bb9d866435 (diff) | |
Add --exclude option to exclude files from processing.
Required some lifting so flags are evaled in the Annex monad before
file filtering.
Diffstat (limited to 'git-annex.hs')
| -rw-r--r-- | git-annex.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/git-annex.hs b/git-annex.hs index 417d335e1..1173ab913 100644 --- a/git-annex.hs +++ b/git-annex.hs @@ -19,5 +19,5 @@ main = do args <- getArgs gitrepo <- Git.repoFromCwd state <- Annex.new gitrepo allBackends - (configure, actions) <- parseCmd args state - tryRun state $ [startup, upgrade] ++ configure ++ actions + (actions, state') <- Annex.run state $ parseCmd args + tryRun state' $ [startup, upgrade] ++ actions |