aboutsummaryrefslogtreecommitdiff
path: root/Annex
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2016-07-19 12:12:19 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2016-07-19 12:12:19 -0400
commit89578d4d3fc3004f04fa84ba933d5d91e0cca868 (patch)
tree5ef60bb1db1cd3e2733ca463fe3c5863283b9b26 /Annex
parenta47769779d2602c35f5c0dc03bdd9acb56b0bf3d (diff)
Avoid any access to keys database in v5 mode repositories, which are not supposed to use that database.
Diffstat (limited to 'Annex')
-rw-r--r--Annex/Version.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/Annex/Version.hs b/Annex/Version.hs
index cb637e11a..af9487871 100644
--- a/Annex/Version.hs
+++ b/Annex/Version.hs
@@ -55,6 +55,9 @@ versionSupportsUnlockedPointers = go <$> getVersion
versionSupportsAdjustedBranch :: Annex Bool
versionSupportsAdjustedBranch = versionSupportsUnlockedPointers
+versionUsesKeysDatabase :: Annex Bool
+versionUsesKeysDatabase = versionSupportsUnlockedPointers
+
setVersion :: Version -> Annex ()
setVersion = setConfig versionField