quash warning
This commit is contained in:
parent
3ac9c4e672
commit
c34948247e
1 changed files with 2 additions and 2 deletions
|
@ -54,8 +54,8 @@ perform = do
|
||||||
Nothing -> noop
|
Nothing -> noop
|
||||||
Just a -> do
|
Just a -> do
|
||||||
showStart "direct" f
|
showStart "direct" f
|
||||||
r <- tryAnnex a
|
r' <- tryAnnex a
|
||||||
case r of
|
case r' of
|
||||||
Left e -> warnlocked e
|
Left e -> warnlocked e
|
||||||
Right _ -> showEndOk
|
Right _ -> showEndOk
|
||||||
return Nothing
|
return Nothing
|
||||||
|
|
Loading…
Add table
Reference in a new issue