mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

Add --exclude option to exclude files from processing.

Browse source 
Required some lifting so flags are evaled in the Annex monad before
file filtering.
This commit is contained in:
Joey Hess 2010-12-08 14:07:49 -04:00
parent 627a301437
commit 2099407d8a
5 changed files with 57 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

4
git-annex.hs
View file

@ -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