@@ -57,7 +57,8 @@ runTestSuite :: BuildSettings
5757runTestSuite settings testdir hasTestSuites prevPassed (packageName, (version, Maintainer maintainer)) = do
5858 -- Set up a new environment that includes the sandboxed bin folder in PATH.
5959 env' <- getEnvironment
60− let menv = Just $ map (fixEnv $ binDir settings) env'
60+ let menv = Just $ ("PACKAGE_SANDBOX", packageDir settings)
61+ : map (fixEnv $ binDir settings) env'
6162
6263 let run cmd args wdir handle = do
6364 ph <- runProcess cmd args (Just wdir) menv Nothing (Just handle) (Just handle)