aboutsummaryrefslogtreecommitdiff
path: root/Remotes.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remotes.hs')
-rw-r--r--Remotes.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Remotes.hs b/Remotes.hs
index a0894f418..07aafe51b 100644
--- a/Remotes.hs
+++ b/Remotes.hs
@@ -36,7 +36,7 @@ withKey key = do
-- mounted at their location). So unless it happens to find all
-- remotes, try harder, loading the remotes' configs.
remotes <- reposByUUID allremotes uuids
- remotesread <- Annex.flagIsSet RemotesRead
+ remotesread <- Annex.flagIsSet "remotesread"
if ((length allremotes /= length remotes) && not remotesread)
then tryharder allremotes uuids
else return remotes
@@ -46,7 +46,7 @@ withKey key = do
eitherremotes <- mapM tryGitConfigRead allremotes
let allremotes' = map fromEither eitherremotes
remotes' <- reposByUUID allremotes' uuids
- Annex.flagChange RemotesRead True
+ Annex.flagChange "remotesread" $ FlagBool True
return remotes'
{- Cost Ordered list of remotes. -}