diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-09-09 09:58:17 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-09-09 10:02:15 -0400 |
| commit | 6d3c84755bc79f04724a0f88975d7e9400395f10 (patch) | |
| tree | e7cd10c5a1040a8044aa65b29891416c7a59733d /Command/Sync.hs | |
| parent | 62dc499541761d43f9938b34561bc93bb3f67e4e (diff) | |
sync: support gcrypt4.20130909
Diffstat (limited to 'Command/Sync.hs')
| -rw-r--r-- | Command/Sync.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/Sync.hs b/Command/Sync.hs index 567e3146b..e7da229a0 100644 --- a/Command/Sync.hs +++ b/Command/Sync.hs @@ -67,12 +67,12 @@ syncRemotes rs = ifM (Annex.getState Annex.fast) ( nub <$> pickfast , wanted ) | otherwise = listed listed = do l <- catMaybes <$> mapM (Remote.byName . Just) rs - let s = filter Remote.specialRemote l + let s = filter (not . Remote.syncableRemote) l unless (null s) $ error $ "cannot sync special remotes: " ++ unwords (map Types.Remote.name s) return l - available = filter (not . Remote.specialRemote) + available = filter Remote.syncableRemote . filter (remoteAnnexSync . Types.Remote.gitconfig) <$> Remote.remoteList good = filterM $ Remote.Git.repoAvail . Types.Remote.repo |