summaryrefslogtreecommitdiff
path: root/Annex/Version.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2015-12-09 15:18:25 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2015-12-09 15:18:54 -0400
commit855c0dd645f53da3ad10320605ef4e5e6276305b (patch)
tree33835a3172dd5f21c2b1c07a6ae087a55a8195d5 /Annex/Version.hs
parent819e710ac27f0e50a83eb5f2036b5c4a041c882c (diff)
avoid pre-commit hook messing up new-style unlocked files in v6 repo
Diffstat (limited to 'Annex/Version.hs')
-rw-r--r--Annex/Version.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/Annex/Version.hs b/Annex/Version.hs
index f9b24d9c4..4c2a990fa 100644
--- a/Annex/Version.hs
+++ b/Annex/Version.hs
@@ -43,6 +43,12 @@ versionSupportsDirectMode = go <$> getVersion
go (Just "6") = False
go _ = True
+versionSupportsUnlockedPointers :: Annex Bool
+versionSupportsUnlockedPointers = go <$> getVersion
+ where
+ go (Just "6") = True
+ go _ = False
+
setVersion :: Version -> Annex ()
setVersion = setConfig versionField