finished converting all the main options
This commit is contained in:
parent
5cc882a35e
commit
6a4f2087be
22 changed files with 165 additions and 122 deletions
|
@ -18,9 +18,10 @@ import Annex.Transfer
|
|||
import Logs.Presence
|
||||
|
||||
cmd :: Command
|
||||
cmd = command "move" SectionCommon
|
||||
"move content of files to/from another repository"
|
||||
paramPaths (seek <--< optParser)
|
||||
cmd = withGlobalOptions (jobsOption : annexedMatchingOptions) $
|
||||
command "move" SectionCommon
|
||||
"move content of files to/from another repository"
|
||||
paramPaths (seek <--< optParser)
|
||||
|
||||
data MoveOptions = MoveOptions
|
||||
{ moveFiles :: CmdParams
|
||||
|
@ -28,8 +29,6 @@ data MoveOptions = MoveOptions
|
|||
, keyOptions :: Maybe KeyOptions
|
||||
}
|
||||
|
||||
-- TODO: jobsOption, annexedMatchingOptions
|
||||
|
||||
optParser :: CmdParamsDesc -> Parser MoveOptions
|
||||
optParser desc = MoveOptions
|
||||
<$> cmdParams desc
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue