diff options
| -rw-r--r-- | Assistant/Sync.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs index 25fa44a69..54dcb42c2 100644 --- a/Assistant/Sync.hs +++ b/Assistant/Sync.hs @@ -165,9 +165,10 @@ syncAction rs a | otherwise = do i <- addAlert $ syncAlert nonxmppremotes failed <- a rs + let failed' = filter (Git.repoIsLocalUnknown . Remote.repo) failed let succeeded = filter (`notElem` failed) nonxmppremotes updateAlertMap $ mergeAlert i $ - syncResultAlert succeeded failed + syncResultAlert succeeded failed' return failed where nonxmppremotes = filter (not . isXMPPRemote) rs |