diff --git a/test/integration/tests/443-specify-path/Main.hs b/test/integration/tests/443-specify-path/Main.hs index 03d50d5e52..621bf652f6 100644 --- a/test/integration/tests/443-specify-path/Main.hs +++ b/test/integration/tests/443-specify-path/Main.hs @@ -1,5 +1,6 @@ import StackTest import System.Directory +import System.FilePath main :: IO () main = do @@ -20,6 +21,7 @@ main = do doesExist "happy" -- install in absolute path - tmpDirectory <- getTemporaryDirectory + tmpDirectory <- fmap ( "absolute-bin") getCurrentDirectory + createDirectory tmpDirectory stack ["--local-bin-path", tmpDirectory, "install", "happy" ] - doesExist "/tmp/happy" + doesExist (tmpDirectory "happy")