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
|
@ -23,7 +23,8 @@ import qualified Utility.Dot as Dot
|
|||
data Link = Link Git.Repo Git.Repo
|
||||
|
||||
command :: [Command]
|
||||
command = [repoCommand "map" paramNothing seek "generate map of repositories"]
|
||||
command = [Command "map" paramNothing needsNothing seek
|
||||
"generate map of repositories"]
|
||||
|
||||
seek :: [CommandSeek]
|
||||
seek = [withNothing start]
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue