inverted logic
This commit is contained in:
parent
252b2e92b0
commit
95e748cbd4
2 changed files with 2 additions and 2 deletions
|
@ -108,7 +108,7 @@ toPerform dest move key = moveLock move key $ do
|
|||
fromStart :: Remote.Remote Annex -> Bool -> FilePath -> Key -> CommandStart
|
||||
fromStart src move file key
|
||||
| move = go
|
||||
| otherwise = stopUnless (inAnnex key) go
|
||||
| otherwise = stopUnless (not <$> inAnnex key) go
|
||||
where
|
||||
go = stopUnless (fromOk src key) $ do
|
||||
showMoveAction move file
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue