diff options
author | Joey Hess <joey@kitenet.net> | 2013-10-29 13:41:44 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-10-29 13:41:44 -0400 |
commit | 2db78797ee58e53f06bd2d104fb203c45247e7c0 (patch) | |
tree | 3b8b7ab10eeb2cb8c787a6d57c1a03bb623ece6a /Assistant/Sync.hs | |
parent | 255354acc20f2680126b22cc02a0893d1d72d804 (diff) |
move code around and rename thread; no functional changes
Diffstat (limited to 'Assistant/Sync.hs')
-rw-r--r-- | Assistant/Sync.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Assistant/Sync.hs b/Assistant/Sync.hs index 5715901d6..4a021df2e 100644 --- a/Assistant/Sync.hs +++ b/Assistant/Sync.hs @@ -33,7 +33,7 @@ import Assistant.NamedThread import Assistant.Threads.Watcher (watchThread, WatcherControl(..)) import Assistant.TransferSlots import Assistant.TransferQueue -import Assistant.RemoteProblem +import Assistant.RepoProblem import Logs.Transfer import Data.Time.Clock @@ -67,7 +67,7 @@ reconnectRemotes notifypushes rs = void $ do failedrs <- syncAction rs' (const go) forM_ failedrs $ \r -> whenM (liftIO $ Remote.checkAvailable False r) $ - remoteHasProblem r + repoHasProblem (Remote.uuid r) mapM_ signal $ filter (`notElem` failedrs) rs' where gitremotes = filter (notspecialremote . Remote.repo) rs |