diff --git a/test/Main.hs b/test/Main.hs index 01416a100..c4abe2177 100644 --- a/test/Main.hs +++ b/test/Main.hs @@ -29,7 +29,7 @@ main = do let dbStructure = either (error.show) id result withApp = return $ postgrest testCfg dbStructure pool - hspec . sequence_ . map (before withApp) $ specs + hspec . mapM_ (beforeAll_ resetDb . before withApp) $ specs where specs = map (uncurry describe) [