summaryrefslogtreecommitdiff
path: root/Annex/Wanted.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-10-08 16:12:02 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-10-08 16:12:02 -0400
commitd28119528abcba81598ad5cdbf4f5fc0f8ed31a1 (patch)
tree455f553fd3b76e7c0dc2830a4aa25153fd39ff2f /Annex/Wanted.hs
parent84a60358dfca930409622732aa023e6e00322319 (diff)
fix invered logic for shouldDrop
Diffstat (limited to 'Annex/Wanted.hs')
-rw-r--r--Annex/Wanted.hs2
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