rekey, setpresentkey: Support --json and --json-error-messages
Sponsored-By: the NIH-funded NICEMAN (ReproNim TR&D3) project
This commit is contained in:
parent
9bc9421c08
commit
38fc5d3fc7
6 changed files with 44 additions and 24 deletions
|
@ -25,10 +25,11 @@ import qualified Utility.RawFilePath as R
|
|||
import System.PosixCompat.Files (linkCount, fileMode)
|
||||
|
||||
cmd :: Command
|
||||
cmd = command "rekey" SectionPlumbing
|
||||
"change keys used for files"
|
||||
(paramRepeating $ paramPair paramPath paramKey)
|
||||
(seek <$$> optParser)
|
||||
cmd = withAnnexOptions [jsonOptions] $
|
||||
command "rekey" SectionPlumbing
|
||||
"change keys used for files"
|
||||
(paramRepeating $ paramPair paramPath paramKey)
|
||||
(seek <$$> optParser)
|
||||
|
||||
data ReKeyOptions = ReKeyOptions
|
||||
{ reKeyThese :: CmdParams
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue