fix implicit --all in bare repo
Using the many combinator resulted in Just (WantBranchKeys []) which bypassed the defualt used for Nothing.
This commit is contained in:
parent
d13194b230
commit
db323d2837
1 changed files with 1 additions and 1 deletions
|
@ -153,7 +153,7 @@ parseKeyOptions allowincomplete = if allowincomplete
|
||||||
else base
|
else base
|
||||||
where
|
where
|
||||||
base = parseAllOption
|
base = parseAllOption
|
||||||
<|> WantBranchKeys <$> many (option (str >>= pure . Ref)
|
<|> WantBranchKeys <$> some (option (str >>= pure . Ref)
|
||||||
( long "branch" <> metavar paramRef
|
( long "branch" <> metavar paramRef
|
||||||
<> help "operate on files in the specified branch or treeish"
|
<> help "operate on files in the specified branch or treeish"
|
||||||
))
|
))
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue