better variable name

This commit is contained in:
Joey Hess 2012-10-14 14:47:01 -04:00
parent b2d266267f
commit 6ea6a2e71c
9 changed files with 22 additions and 23 deletions

View file

@ -99,7 +99,7 @@ repoList onlyconfigured includehere
| otherwise = list =<< (++) <$> configured <*> rest
where
configured = do
rs <- filter (not . Remote.readonly) . knownRemotes <$>
rs <- filter (not . Remote.readonly) . syncRemotes <$>
(liftIO . getDaemonStatus =<< daemonStatus <$> getYesod)
runAnnex [] $ do
u <- getUUID

View file

@ -40,7 +40,7 @@ changeSyncable (Just r) False = do
webapp <- getYesod
let dstatus = daemonStatus webapp
let st = fromJust $ threadState webapp
liftIO $ runThreadState st $ updateKnownRemotes dstatus
liftIO $ runThreadState st $ updateSyncRemotes dstatus
{- Stop all transfers to or from this remote.
- XXX Can't stop any ongoing scan, or git syncs. -}
void $ liftIO $ dequeueTransfers (transferQueue webapp) dstatus tofrom