refactor in preparation for adding a git-annex-shell command
This commit is contained in:
parent
6a5be9d53c
commit
a89a6f2114
24 changed files with 204 additions and 136 deletions
|
@ -13,6 +13,10 @@ import Control.Monad.State (liftIO)
|
|||
import Command
|
||||
import Core
|
||||
|
||||
command :: [Command]
|
||||
command = [Command "find" (paramOptional $ paramRepeating paramPath) seek
|
||||
"lists available files"]
|
||||
|
||||
seek :: [CommandSeek]
|
||||
seek = [withDefault "." withFilesInGit start]
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue