Use DAML_PROJECT env in favor of changing the process cwd

obsidiansystems · Apr 29, 2024 · e3ec943 · e3ec943
1 parent 52a39e7
commit e3ec943
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/hs/src/Daml/Cucumber.hs b/hs/src/Daml/Cucumber.hs
@@ -285,9 +285,9 @@ runTestSuite opts = do
           case shouldRunTests of
             True -> do
               writeDamlScript testFile result
-              let damlProc = proc damlPath ["test", "--files", testFile]
-                  damlProcRelativeToProject = damlProc { cwd = Just damlLocation }
-              (ec, damlTestStdout, damlTestStderr) <- liftIO $ readCreateProcessWithExitCode damlProcRelativeToProject ""
+              let setDamlProject path process = process { env = Just [("DAML_PROJECT", path)] }
+                  damlProc = setDamlProject damlLocation $ proc damlPath ["test", "--files", testFile]
+              (ec, damlTestStdout, damlTestStderr) <- liftIO $ readCreateProcessWithExitCode damlProc ""
               case ec of
                 ExitFailure _ -> do
                   -- The "Test Summary" text only appears if "daml test" was able to run