diff options
author | Joey Hess <joey@kitenet.net> | 2012-10-08 16:12:02 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-10-08 16:12:02 -0400 |
commit | d28119528abcba81598ad5cdbf4f5fc0f8ed31a1 (patch) | |
tree | 455f553fd3b76e7c0dc2830a4aa25153fd39ff2f /Annex/Wanted.hs | |
parent | 84a60358dfca930409622732aa023e6e00322319 (diff) |
fix invered logic for shouldDrop
Diffstat (limited to 'Annex/Wanted.hs')
-rw-r--r-- | Annex/Wanted.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Annex/Wanted.hs b/Annex/Wanted.hs index a92b1036f..2775c22cb 100644 --- a/Annex/Wanted.hs +++ b/Annex/Wanted.hs @@ -47,4 +47,4 @@ shouldDrop _ _ False = return True shouldDrop from file True = do fp <- inRepo $ toTopFilePath file u <- maybe getUUID (return . Remote.uuid) from - isPreferredContent (Just u) (S.singleton u) fp + not <$> isPreferredContent (Just u) (S.singleton u) fp |