summaryrefslogtreecommitdiff
path: root/Remote/GCrypt.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-10-01 14:38:20 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-10-01 14:38:20 -0400
commitcbefe5cd014115d2e82affaf7cb006ee592cc048 (patch)
tree6dfc0e48407efc7ea49179d27fa2c029ffdc195e /Remote/GCrypt.hs
parent36d4d018420da4c515a8b6e4a8a7ba1caee0c6a7 (diff)
fix probing for local gcrypt repos
Diffstat (limited to 'Remote/GCrypt.hs')
-rw-r--r--Remote/GCrypt.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Remote/GCrypt.hs b/Remote/GCrypt.hs
index 475a4785f..acbf3cd68 100644
--- a/Remote/GCrypt.hs
+++ b/Remote/GCrypt.hs
@@ -375,7 +375,7 @@ coreGCryptId = "core.gcrypt-id"
- (Also returns a version of input repo with its config read.) -}
getGCryptId :: Bool -> Git.Repo -> Annex (Maybe Git.GCrypt.GCryptId, Git.Repo)
getGCryptId fast r
- | Git.repoIsLocal r = extract <$>
+ | Git.repoIsLocal r || Git.repoIsLocalUnknown r = extract <$>
liftIO (catchMaybeIO $ Git.Config.read r)
| not fast = extract . liftM fst <$> getM (eitherToMaybe <$>)
[ Ssh.onRemote r (Git.Config.fromPipe r, Left undefined) "configlist" [] []