renameremote: Support --json and --json-error-messages
Seems unlikely to be useful, but it works so Sponsored-By: the NIH-funded NICEMAN (ReproNim TR&D3) project
This commit is contained in:
parent
a5d0c85ae1
commit
a71c831949
3 changed files with 8 additions and 7 deletions
|
@ -18,10 +18,11 @@ import Types.ProposedAccepted
|
|||
import qualified Data.Map as M
|
||||
|
||||
cmd :: Command
|
||||
cmd = command "renameremote" SectionSetup
|
||||
"changes name of special remote"
|
||||
(paramPair paramName paramName)
|
||||
(withParams seek)
|
||||
cmd = withAnnexOptions [jsonOptions] $
|
||||
command "renameremote" SectionSetup
|
||||
"changes name of special remote"
|
||||
(paramPair paramName paramName)
|
||||
(withParams seek)
|
||||
|
||||
seek :: CmdParams -> CommandSeek
|
||||
seek = withWords (commandAction . start)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue