@@ -263,7 +263,7 @@ runContainerAndExit = do
263
263
," -v" ,toFilePathNoTrailingSep stackRoot ++ " :" ++ toLinuxStylePath (toFilePathNoTrailingSep stackRoot ++ mountSuffix)
264
264
," -v" ,toFilePathNoTrailingSep projectRoot ++ " :" ++ toLinuxStylePath (toFilePathNoTrailingSep projectRoot ++ mountSuffix)
265
265
," -v" ,toFilePathNoTrailingSep sandboxHomeDir ++ " :" ++ toLinuxStylePath (toFilePathNoTrailingSep sandboxHomeDir ++ mountSuffix)
266
- ," -w" , toLinuxStylePath (toFilePathNoTrailingSep pwd)]
266
+ ," -w" ,toLinuxStylePath (toFilePathNoTrailingSep pwd)]
267
267
,case dockerNetwork docker of
268
268
Nothing -> [" --net=host" ]
269
269
Just name -> [" --net=" ++ name]
@@ -278,8 +278,8 @@ runContainerAndExit = do
278
278
,case mstackYaml of
279
279
Nothing -> []
280
280
Just stackYaml ->
281
- [" -e" ," STACK_YAML=" ++ stackYaml
282
- ," -v" ,stackYaml++ " :" ++ stackYaml ++ " :ro" ]
281
+ [" -e" ," STACK_YAML=" ++ toLinuxStylePath stackYaml
282
+ ," -v" ,stackYaml ++ " :" ++ toLinuxStylePath stackYaml ++ " :ro" ]
283
283
-- Disable the deprecated entrypoint in FP Complete-generated images
284
284
,[" --entrypoint=/usr/bin/env"
285
285
| isJust (lookupImageEnv oldSandboxIdEnvVar imageEnvVars) &&
0 commit comments