From 855c0dd645f53da3ad10320605ef4e5e6276305b Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Wed, 9 Dec 2015 15:18:25 -0400 Subject: avoid pre-commit hook messing up new-style unlocked files in v6 repo --- Annex/Version.hs | 6 ++++++ 1 file changed, 6 insertions(+) (limited to 'Annex') 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 -- cgit v1.2.3