diff options
Diffstat (limited to 'Remote/Git.hs')
| -rw-r--r-- | Remote/Git.hs | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/Remote/Git.hs b/Remote/Git.hs index 2a6ed0c77..5b9a72a01 100644 --- a/Remote/Git.hs +++ b/Remote/Git.hs @@ -87,10 +87,9 @@ list = do - cached UUID value. -} configRead :: Git.Repo -> Annex Git.Repo configRead r = do - g <- fromRepo id - let c = extractRemoteGitConfig g (Git.repoDescribe r) + gc <- Annex.getRemoteGitConfig r u <- getRepoUUID r - case (repoCheap r, remoteAnnexIgnore c, u) of + case (repoCheap r, remoteAnnexIgnore gc, u) of (_, True, _) -> return r (True, _, _) -> tryGitConfigRead r (False, _, NoUUID) -> tryGitConfigRead r |