diff options
author | Joey Hess <id@joeyh.name> | 2015-12-15 17:47:59 -0700 |
---|---|---|
committer | Joey Hess <id@joeyh.name> | 2015-12-15 17:47:59 -0700 |
commit | 7c12f0ac9224246dac308e837bccb5b2157062ee (patch) | |
tree | 0caa943db39f9a2bfad404c547acda354076b46a /Git/BuildVersion.hs | |
download | git-repair-7c12f0ac9224246dac308e837bccb5b2157062ee.tar.gz |
Import git-repair_1.20151215.orig.tar.xz
[dgit import orig git-repair_1.20151215.orig.tar.xz]
Diffstat (limited to 'Git/BuildVersion.hs')
-rw-r--r-- | Git/BuildVersion.hs | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/Git/BuildVersion.hs b/Git/BuildVersion.hs new file mode 100644 index 0000000..50e4a3a --- /dev/null +++ b/Git/BuildVersion.hs @@ -0,0 +1,21 @@ +{- git build version + - + - Copyright 2011 Joey Hess <id@joeyh.name> + - + - Licensed under the GNU GPL version 3 or higher. + -} + +module Git.BuildVersion where + +import Git.Version +import qualified Build.SysConfig + +{- Using the version it was configured for avoids running git to check its + - version, at the cost that upgrading git won't be noticed. + - This is only acceptable because it's rare that git's version influences + - code's behavior. -} +buildVersion :: GitVersion +buildVersion = normalize Build.SysConfig.gitversion + +older :: String -> Bool +older n = buildVersion < normalize n |