diff options
Diffstat (limited to 'Annex/Version.hs')
-rw-r--r-- | Annex/Version.hs | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/Annex/Version.hs b/Annex/Version.hs index 30ad957c3..6149e6fb7 100644 --- a/Annex/Version.hs +++ b/Annex/Version.hs @@ -9,6 +9,7 @@ module Annex.Version where import Common.Annex import Config +import qualified Annex type Version = String @@ -25,10 +26,7 @@ versionField :: ConfigKey versionField = annexConfig "version" getVersion :: Annex (Maybe Version) -getVersion = handle <$> getConfig versionField "" - where - handle [] = Nothing - handle v = Just v +getVersion = annexVersion <$> Annex.getGitConfig setVersion :: Annex () setVersion = setConfig versionField defaultVersion |