diff options
| author | Joey Hess <joeyh@joeyh.name> | 2018-06-26 10:04:42 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2018-06-26 10:04:42 -0400 |
| commit | 87b329e4515d7ddce828422cf196180d76afb2d1 (patch) | |
| tree | 2f39b14e18951855980aaa27ebdb89380ecb3f6c /Build | |
| parent | c913f39dc8661dfc9fcc97f0e4514a5b72f46e50 (diff) | |
remove code to update version in cabal file
I have not used this when making releases for a long time.
Diffstat (limited to 'Build')
| -rw-r--r-- | Build/Configure.hs | 2 | ||||
| -rw-r--r-- | Build/Version.hs | 18 |
2 files changed, 0 insertions, 20 deletions
diff --git a/Build/Configure.hs b/Build/Configure.hs index 31d7dcafa4..4907d976fb 100644 --- a/Build/Configure.hs +++ b/Build/Configure.hs @@ -121,8 +121,6 @@ run ts = do Just "Android" -> writeSysConfig $ androidConfig config _ -> writeSysConfig config cleanup - whenM isReleaseBuild $ - cabalSetup "git-annex.cabal" {- Hard codes some settings to cross-compile for Android. -} androidConfig :: [Config] -> [Config] diff --git a/Build/Version.hs b/Build/Version.hs index d39a0fe08b..57364948a2 100644 --- a/Build/Version.hs +++ b/Build/Version.hs @@ -51,21 +51,3 @@ getChangelogVersion = do return $ middle (words verline !! 1) where middle = drop 1 . init - -{- Set up cabal file with version. -} -cabalSetup :: FilePath -> IO () -cabalSetup cabalfile = do - version <- takeWhile (\c -> isDigit c || c == '.') - <$> getChangelogVersion - cabal <- readFile cabalfile - writeFile tmpcabalfile $ unlines $ - map (setfield "Version" version) $ - lines cabal - renameFile tmpcabalfile cabalfile - where - tmpcabalfile = cabalfile++".tmp" - setfield field value s - | fullfield `isPrefixOf` s = fullfield ++ value - | otherwise = s - where - fullfield = field ++ ": " |