diff options
author | Daniel Gröber <dxld@darkboxed.org> | 2017-06-12 04:01:08 +0200 |
---|---|---|
committer | Daniel Gröber <dxld@darkboxed.org> | 2017-06-12 04:02:09 +0200 |
commit | 67d69effb49096a4f649e7a0c1a09b61c409f004 (patch) | |
tree | e98e7ecbabd4a390bf59dbfdef323eec0b1c5d99 | |
parent | c365e153d9379e7a1f5dd7a700aeb5eff619e4f3 (diff) |
Fix unpackCabalHEAD on squeeze due to old git
-rw-r--r-- | CabalHelper/Compile.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/CabalHelper/Compile.hs b/CabalHelper/Compile.hs index 66cd96b..5071e15 100644 --- a/CabalHelper/Compile.hs +++ b/CabalHelper/Compile.hs @@ -375,7 +375,8 @@ unpackCabalHEAD tmpdir = do let dir = tmpdir </> "cabal-head.git" url = "https://github.com/haskell/cabal.git" ExitSuccess <- rawSystem "git" [ "clone", "--depth=1", url, dir] - commit <- trim <$> readProcess "git" ["-C", dir, "rev-parse", "HEAD"] "" + let git_rev_parse = (proc "git" ["rev-parse", "HEAD"]) { cwd = Just dir } + commit <- trim <$> readCreateProcess git_rev_parse "" return (dir </> "Cabal", commit) errorInstallCabal :: Version -> FilePath -> a |