refactored and generalized pre-command sanity checking
This commit is contained in:
parent
66194684ac
commit
5b74b130a3
38 changed files with 73 additions and 67 deletions
|
@ -17,10 +17,9 @@ import qualified Types.Remote as R
|
|||
import Annex.UUID
|
||||
|
||||
command :: [Command]
|
||||
command = [repoCommand "initremote"
|
||||
(paramPair paramName $
|
||||
paramOptional $ paramRepeating paramKeyValue) seek
|
||||
"sets up a special (non-git) remote"]
|
||||
command = [Command "initremote"
|
||||
(paramPair paramName $ paramOptional $ paramRepeating paramKeyValue)
|
||||
needsRepo seek "sets up a special (non-git) remote"]
|
||||
|
||||
seek :: [CommandSeek]
|
||||
seek = [withWords start]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue