summaryrefslogtreecommitdiff
path: root/Remote/List.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remote/List.hs')
-rw-r--r--Remote/List.hs14
1 files changed, 7 insertions, 7 deletions
diff --git a/Remote/List.hs b/Remote/List.hs
index 234f310a5..ea1d61ce3 100644
--- a/Remote/List.hs
+++ b/Remote/List.hs
@@ -56,8 +56,8 @@ remoteList = do
Annex.changeState $ \s -> s { Annex.remotes = rs' }
return rs'
else return rs
- where
- process m t = enumerate t >>= mapM (remoteGen m t)
+ where
+ process m t = enumerate t >>= mapM (remoteGen m t)
{- Forces the remoteList to be re-generated, re-reading the git config. -}
remoteListRefresh :: Annex [Remote]
@@ -81,11 +81,11 @@ updateRemote remote = do
m <- readRemoteLog
remote' <- updaterepo $ repo remote
remoteGen m (remotetype remote) remote'
- where
- updaterepo r
- | Git.repoIsLocal r || Git.repoIsLocalUnknown r =
- Remote.Git.configRead r
- | otherwise = return r
+ where
+ updaterepo r
+ | Git.repoIsLocal r || Git.repoIsLocalUnknown r =
+ Remote.Git.configRead r
+ | otherwise = return r
{- All remotes that are not ignored. -}
enabledRemoteList :: Annex [Remote]