Absolute path for test suites

This commit is contained in:
Michael Snoyman 2013-01-25 06:33:00 +02:00
parent 3682ad5612
commit 1e8b363ce1

View File

@ -20,7 +20,8 @@ import System.IO (IOMode (WriteMode, AppendMode),
import System.Process (runProcess, waitForProcess)
runTestSuites :: BuildSettings -> BuildPlan -> IO ()
runTestSuites settings bp = do
runTestSuites settings' bp = do
settings <- fixBuildSettings settings'
let selected = bpPackages bp
putStrLn "Running test suites"
let testdir = "runtests"