From 015a497914d0614afff705d5f9acd79d956740ec Mon Sep 17 00:00:00 2001
From: Joey Hess <joey@kitenet.net>
Date: Sat, 31 Dec 2011 01:42:42 -0400
Subject: avoid syncing remotes configured annex-ignore, unless explicitly
 specified

---
 Command/Sync.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'Command')

diff --git a/Command/Sync.hs b/Command/Sync.hs
index 81b77e5cc..d8eb0fc39 100644
--- a/Command/Sync.hs
+++ b/Command/Sync.hs
@@ -54,12 +54,12 @@ syncRemotes rs = do
 		else wanted
 	where
 		wanted
-			| null rs = filterM hasurl =<< Remote.remoteList
+			| null rs = filterM hasurl =<< Remote.enabledRemoteList
 			| otherwise = listed
 		listed = mapM Remote.byName rs
 		hasurl r = not . null <$> geturl r
 		geturl r = fromRepo $ Git.Config.get ("remote." ++ Remote.name r ++ ".url") ""
-		pickfast = (++) <$> listed <*> (fastest <$> Remote.remoteList)
+		pickfast = (++) <$> listed <*> (fastest <$> Remote.enabledRemoteList)
 		fastest = fromMaybe [] . headMaybe .
 			map snd . sort . M.toList . costmap
 		costmap = M.fromListWith (++) . map costpair
-- 
cgit v1.2.3