diff options
| -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 |