Codebase list haskell-happstack-hsp / ad0e1be
stack: Disable tests that require network access Ilias Tsitsimpis 1 year, 2 months ago
3 changed file(s) with 57 addition(s) and 0 deletion(s). Raw diff Collapse all Expand all
0 haskell-stack (2.7.5-2) unstable; urgency=medium
1
2 * Disable tests that require network access (Closes: #1026661)
3
4 -- Ilias Tsitsimpis <iliastsi@debian.org> Sat, 21 Jan 2023 18:31:34 +0200
5
06 haskell-stack (2.7.5-1) unstable; urgency=medium
17
28 * New upstream release (Closes: #1011855)
0 Index: b/src/test/Stack/ConfigSpec.hs
1 ===================================================================
2 --- a/src/test/Stack/ConfigSpec.hs
3 +++ b/src/test/Stack/ConfigSpec.hs
4 @@ -183,26 +183,26 @@ spec = beforeAll setup $ do
5 boptsReconfigure `shouldBe` True
6 boptsCabalVerbose `shouldBe` True
7
8 - it "finds the config file in a parent directory" $ inTempDir $ do
9 - writeFile "package.yaml" "name: foo"
10 - writeFile (toFilePath stackDotYaml) sampleConfig
11 - parentDir <- getCurrentDirectory >>= parseAbsDir
12 - let childDir = "child"
13 - createDirectory childDir
14 - setCurrentDirectory childDir
15 - loadConfig' $ \config -> liftIO $ do
16 - bc <- runRIO config $ withBuildConfig ask
17 - view projectRootL bc `shouldBe` parentDir
18 + -- it "finds the config file in a parent directory" $ inTempDir $ do
19 + -- writeFile "package.yaml" "name: foo"
20 + -- writeFile (toFilePath stackDotYaml) sampleConfig
21 + -- parentDir <- getCurrentDirectory >>= parseAbsDir
22 + -- let childDir = "child"
23 + -- createDirectory childDir
24 + -- setCurrentDirectory childDir
25 + -- loadConfig' $ \config -> liftIO $ do
26 + -- bc <- runRIO config $ withBuildConfig ask
27 + -- view projectRootL bc `shouldBe` parentDir
28
29 - it "respects the STACK_YAML env variable" $ inTempDir $ do
30 - withSystemTempDir "config-is-here" $ \dir -> do
31 - let stackYamlFp = toFilePath (dir </> stackDotYaml)
32 - writeFile stackYamlFp sampleConfig
33 - writeFile (toFilePath dir ++ "/package.yaml") "name: foo"
34 - withEnvVar "STACK_YAML" stackYamlFp $ loadConfig' $ \config -> liftIO $ do
35 - BuildConfig{..} <- runRIO config $ withBuildConfig ask
36 - bcStackYaml `shouldBe` dir </> stackDotYaml
37 - parent bcStackYaml `shouldBe` dir
38 + -- it "respects the STACK_YAML env variable" $ inTempDir $ do
39 + -- withSystemTempDir "config-is-here" $ \dir -> do
40 + -- let stackYamlFp = toFilePath (dir </> stackDotYaml)
41 + -- writeFile stackYamlFp sampleConfig
42 + -- writeFile (toFilePath dir ++ "/package.yaml") "name: foo"
43 + -- withEnvVar "STACK_YAML" stackYamlFp $ loadConfig' $ \config -> liftIO $ do
44 + -- BuildConfig{..} <- runRIO config $ withBuildConfig ask
45 + -- bcStackYaml `shouldBe` dir </> stackDotYaml
46 + -- parent bcStackYaml `shouldBe` dir
47
48 it "STACK_YAML can be relative" $ inTempDir $ do
49 parentDir <- getCurrentDirectory >>= parseAbsDir
00 remove-mintty.patch
11 lts-19
2 disable-network-tests