From 955bc2ac1a1cddee52fa574c7585db867e857cbd Mon Sep 17 00:00:00 2001 From: David Hewson <david.hewson@tracsis.com> Date: Tue, 12 Dec 2023 18:25:23 +0000 Subject: [PATCH] undo this show related change in waitEither can't trigger the difference, if i find out what it was it can come back --- src/Test/WebDriver/Commands/Wait.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Test/WebDriver/Commands/Wait.hs b/src/Test/WebDriver/Commands/Wait.hs index 9817afe..6f3af06 100644 --- a/src/Test/WebDriver/Commands/Wait.hs +++ b/src/Test/WebDriver/Commands/Wait.hs @@ -122,7 +122,7 @@ waitEither failure success = wait' handler handleFailedCommand e@(FailedCommand NoSuchElement _) = return . Left . show $ e handleFailedCommand err = throwIO err - handleExpectFailed (ExpectFailed e) = return . Left $ e + handleExpectFailed (e :: ExpectFailed) = return . Left . show $ e wait' :: (WDSessionStateIO m, HasCallStack) => ((String -> m b) -> m a -> m b) -> Int -> Double -> m a -> m b