haskell/stackage
1
0
Fork 0
mirror of https://github.com/commercialhaskell/stackage.git synced 2026-03-11 11:16:34 +01:00
Code Issues Actions 1 Packages Projects Releases Wiki Activity

Only unpack when necessary

Browse Source
This commit is contained in:
Chris Done 2015-01-13 19:26:34 +01:00
parent c109bbaa2e
commit a94ff15c59
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
Stackage/ShakeBuild.hs
View File

@ -88,7 +88,9 @@ packageTarget pb shakeDir name plan = do
(M.keys (sdPackages (ppDesc plan))))
pwd <- liftIO getCurrentDirectory
env <- liftIO (fmap (Env . (++ defaultEnv pwd)) getEnvironment)
() <- cmd (Cwd shakeDir) "cabal" "unpack" nameVer
unpacked <- liftIO (doesDirectoryExist (shakeDir <//> nameVer))
unless unpacked
(cmd (Cwd shakeDir) "cabal" "unpack" nameVer)
() <- cmd cwd env "cabal" "configure" (opts pwd)
() <- cmd cwd env "cabal" "build"
() <- cmd cwd env "cabal" "copy"