summaryrefslogtreecommitdiff
path: root/Assistant/Sync.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-03-27 14:19:10 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-03-27 14:19:10 -0400
commit0739cf138ee74640a5fb7f68e024aa416a67da7b (patch)
treee42a1580a5f23907450d68935d4636773a65dbf2 /Assistant/Sync.hs
parentaa9be9ebb265b8a012c199b28d15d77cb9af014c (diff)
fix inverted logic in filtering failed remotes
Diffstat (limited to 'Assistant/Sync.hs')
-rw-r--r--Assistant/Sync.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs
index 54dcb42c2..1c8f84fcd 100644
--- a/Assistant/Sync.hs
+++ b/Assistant/Sync.hs
@@ -165,7 +165,7 @@ syncAction rs a
| otherwise = do
i <- addAlert $ syncAlert nonxmppremotes
failed <- a rs
- let failed' = filter (Git.repoIsLocalUnknown . Remote.repo) failed
+ let failed' = filter (not . Git.repoIsLocalUnknown . Remote.repo) failed
let succeeded = filter (`notElem` failed) nonxmppremotes
updateAlertMap $ mergeAlert i $
syncResultAlert succeeded failed'