refactored and generalized pre-command sanity checking

This commit is contained in:
Joey Hess 2011-10-27 16:31:35 -04:00
parent 66194684ac
commit 5b74b130a3
38 changed files with 73 additions and 67 deletions

View file

@ -19,7 +19,7 @@ import Utility.Touch
import Backend
command :: [Command]
command = [repoCommand "add" paramPaths seek "add files to annex"]
command = [Command "add" paramPaths needsRepo seek "add files to annex"]
{- Add acts on both files not checked into git yet, and unlocked files. -}
seek :: [CommandSeek]