summaryrefslogtreecommitdiff
path: root/Remote/List.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Remote/List.hs')
-rw-r--r--Remote/List.hs4
1 files changed, 1 insertions, 3 deletions
diff --git a/Remote/List.hs b/Remote/List.hs
index 221ab9a54..1ec2c32b4 100644
--- a/Remote/List.hs
+++ b/Remote/List.hs
@@ -15,7 +15,6 @@ import Common.Annex
import qualified Annex
import Logs.Remote
import Types.Remote
-import Types.GitConfig
import Annex.UUID
import Remote.Helper.Hooks
import Remote.Helper.ReadOnly
@@ -94,8 +93,7 @@ remoteListRefresh = do
remoteGen :: M.Map UUID RemoteConfig -> RemoteType -> Git.Repo -> Annex (Maybe Remote)
remoteGen m t r = do
u <- getRepoUUID r
- g <- fromRepo id
- let gc = extractRemoteGitConfig g (Git.repoDescribe r)
+ gc <- Annex.getRemoteGitConfig r
let c = fromMaybe M.empty $ M.lookup u m
mrmt <- generate t r u c gc
return $ adjustReadOnly . addHooks <$> mrmt