@@ -60,9 +60,9 @@ chromeConfig = WD.useBrowser (WD.chrome { WD.chromeBinary = Just "/run/current-s
60-- parallel (requires port fix)
60-- parallel (requires port fix)
62main :: IO ()
62main :: IO ()
63−main = hspec $ parallel $ do
63+main = hspec $ do
65− describe "text" $ parallel $ do
65+ describe "text" $ do
66 it "works" $ do
66 it "works" $ do
67 testWidgetStatic (checkBodyText "hello world") $ do
67 testWidgetStatic (checkBodyText "hello world") $ do
68 text "hello world"
68 text "hello world"
@@ -129,7 +129,7 @@ main = hspec $ parallel $ do
129 text =<< prerender (pure "One") (pure "Two")
129 text =<< prerender (pure "One") (pure "Two")
132− describe "element" $ parallel $ do
132+ describe "element" $ do
133 it "works with domEvent Click" $ do
133 it "works with domEvent Click" $ do
134 clickedRef <- newIORef False
134 clickedRef <- newIORef False
135 testWidget' (WD.findElem $ WD.ByTag "div") WD.click $ do
135 testWidget' (WD.findElem $ WD.ByTag "div") WD.click $ do
@@ -220,7 +220,7 @@ main = hspec $ parallel $ do
220 liftIO $ writeIORef clicked True
220 liftIO $ writeIORef clicked True
223− describe "inputElement" $ parallel $ do
223+ describe "inputElement" $ do
224 describe "hydration" $ do
224 describe "hydration" $ do
225 it "doesn't wipe user input when switching over" $ do
225 it "doesn't wipe user input when switching over" $ do
226 inputRef <- newIORef ""
226 inputRef <- newIORef ""
@@ -433,7 +433,7 @@ main = hspec $ parallel $ do
433 names <- liftJSM $ traverse File.getName fs
433 names <- liftJSM $ traverse File.getName fs
434 liftIO $ writeIORef filesRef names
434 liftIO $ writeIORef filesRef names
436− describe "textAreaElement" $ parallel $ do
436+ describe "textAreaElement" $ do
437 describe "hydration" $ do
437 describe "hydration" $ do
438 it "doesn't wipe user input when switching over" $ do
438 it "doesn't wipe user input when switching over" $ do
439 inputRef <- newIORef ""
439 inputRef <- newIORef ""
@@ -560,7 +560,7 @@ main = hspec $ parallel $ do
560 performEvent_ $ liftIO . writeIORef valueByUIRef <$> _textAreaElement_input e
560 performEvent_ $ liftIO . writeIORef valueByUIRef <$> _textAreaElement_input e
561 performEvent_ $ liftIO . writeIORef valueRef <$> updated (value e)
561 performEvent_ $ liftIO . writeIORef valueRef <$> updated (value e)
563− describe "prerender" $ parallel $ do
563+ describe "prerender" $ do
564 it "works in simple case" $ do
564 it "works in simple case" $ do
565 testWidget (checkBodyText "One") (checkBodyText "Two") $ do
565 testWidget (checkBodyText "One") (checkBodyText "Two") $ do
566 prerender (text "One") (text "Two")
566 prerender (text "One") (text "Two")