@@ -105,16 +105,18 @@ spec = do
105 serverApp = pure $ logRequest $ addCors $ serve testApi testServer
105 serverApp = pure $ logRequest $ addCors $ serve testApi testServer
107 Warp.testWithApplication serverApp $ \serverPort -> do
107 Warp.testWithApplication serverApp $ \serverPort -> do
108+ threadDelay $ 500 * 1000
109 let clientApp :: IO Application
110 let clientApp :: IO Application
110 clientApp = WS.jsaddleOr defaultConnectionOptions (action serverPort >> Run.syncPoint) WS.jsaddleApp
111 clientApp = WS.jsaddleOr defaultConnectionOptions (action serverPort >> Run.syncPoint) WS.jsaddleApp
112 Warp.testWithApplication (simpleCors <$> clientApp) $ \clientPort -> do
113 Warp.testWithApplication (simpleCors <$> clientApp) $ \clientPort -> do
114+ threadDelay $ 500 * 1000
113 putStrLn $ "server http://localhost:" ++ show serverPort
116 putStrLn $ "server http://localhost:" ++ show serverPort
114 putStrLn $ "client http://localhost:" ++ show clientPort
117 putStrLn $ "client http://localhost:" ++ show clientPort
115 putStrLn $ "google-chrome-stable --headless --disable-gpu --screenshot http://localhost:" ++ show clientPort
118 putStrLn $ "google-chrome-stable --headless --disable-gpu --screenshot http://localhost:" ++ show clientPort
117− -- threadDelay $ 1000 * 1000 * 1000
119 -- Run headless chrome
121 -- Run headless chrome
120 -- https://docs.travis-ci.com/user/gui-and-headless-browsers/#using-the-chrome-addon-in-the-headless-mode
122 -- https://docs.travis-ci.com/user/gui-and-headless-browsers/#using-the-chrome-addon-in-the-headless-mode