fix absolute filenames fed into --batch and git-annex info
This commit is contained in:
parent
a14168a321
commit
957a87b437
14 changed files with 106 additions and 37 deletions
|
@ -31,7 +31,7 @@ optParser desc = SetPresentKeyOptions
|
|||
seek :: SetPresentKeyOptions -> CommandSeek
|
||||
seek o = case batchOption o of
|
||||
Batch fmt -> batchInput fmt
|
||||
(parseKeyStatus . words)
|
||||
(pure . parseKeyStatus . words)
|
||||
(batchCommandAction . start)
|
||||
NoBatch -> either giveup (commandAction . start)
|
||||
(parseKeyStatus $ params o)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue