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

Command data structure tweaking

Browse source
This commit is contained in:
Joey Hess 2012-01-05 20:40:31 -04:00
parent cdcf0aac71
commit 47be4383b7
3 changed files with 10 additions and 8 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Types/Command.hs
View file

@ -33,12 +33,12 @@ type CommandCleanup = Annex Bool
{- A command is defined by specifying these things. -}
data Command = Command {
cmdnorepo :: Maybe (IO ()),
cmdcheck :: [CommandCheck],
cmdnorepo :: Maybe (IO ()), -- an action to run when not in a repo
cmdcheck :: [CommandCheck], -- check stage
cmdname :: String,
cmdparams :: String,
cmdseek :: [CommandSeek],
cmddesc :: String
cmdparamdesc :: String, -- description of params for usage
cmdseek :: [CommandSeek], -- seek stage
cmddesc :: String -- description of command for usage
}
{- CommandCheck functions can be compared using their unique id. -}