refactor in preparation for adding a git-annex-shell command

This commit is contained in:
Joey Hess 2010-12-30 15:06:26 -04:00
parent 6a5be9d53c
commit a89a6f2114
24 changed files with 204 additions and 136 deletions

View file

@ -18,8 +18,8 @@ import Types
import Core
import Messages
command :: Command
command = Command "add" paramPath seek "add files to annex"
command :: [Command]
command = [Command "add" paramPath seek "add files to annex"]
{- Add acts on both files not checked into git yet, and unlocked files. -}
seek :: [CommandSeek]