sandwich-webdriver 0.4.0.0 → 0.4.0.1

raw patch · 3 files changed

+9/−5 lines, 3 files

Files

• CHANGELOG.md +4/−0
• sandwich-webdriver.cabal +1/−1
• src/Test/Sandwich/WebDriver/Internal/Dependencies.hs +4/−4

@@ -1,5 +1,9 @@ # Changelog for sandwich-webdriver +# 0.4.0.1++* Fix accidental mismatch in a couple fields with base sandwich package.+ # 0.4.0.0  * Switch to `webdriver-0.13.0.0`, which is a major change.

@@ -5,7 +5,7 @@ -- see: https://github.com/sol/hpack  name:           sandwich-webdriver-version:        0.4.0.0+version:        0.4.0.1 synopsis:       Sandwich integration with Selenium WebDriver description:    Please see the <https://codedownio.github.io/sandwich/docs/extensions/sandwich-webdriver documentation>. category:       Testing

@@ -105,14 +105,14 @@ getBrowserDependencies BrowserDependenciesSpecChrome {..} = do   SomeCommandLineOptions (CommandLineOptions {optWebdriverOptions=(CommandLineWebdriverOptions{..})}) <- getSomeCommandLineOptions   chrome <- maybe (exceptionOnLeft (obtainChrome browserDependenciesSpecChromeChrome)) pure optChromeBinary-  chromeDriver <- maybe (exceptionOnLeft (obtainChromeDriver browserDependenciesSpecChromeChromeDriver)) pure optChromeDriverBinary+  chromeDriver <- maybe (exceptionOnLeft (obtainChromeDriver browserDependenciesSpecChromeChromeDriver)) pure optChromeDriver   info [i|chrome: #{chrome}|]   info [i|chromedriver: ''#{chromeDriver}|]   return $ BrowserDependenciesChrome chrome chromeDriver getBrowserDependencies (BrowserDependenciesSpecFirefox {..}) = do   SomeCommandLineOptions (CommandLineOptions {optWebdriverOptions=(CommandLineWebdriverOptions{..})}) <- getSomeCommandLineOptions   firefox <- maybe (exceptionOnLeft $ obtainFirefox browserDependenciesSpecFirefoxFirefox) pure optFirefoxBinary-  geckoDriver <- maybe (exceptionOnLeft $ obtainGeckoDriver browserDependenciesSpecFirefoxGeckodriver) pure optGeckoDriverBinary+  geckoDriver <- maybe (exceptionOnLeft $ obtainGeckoDriver browserDependenciesSpecFirefoxGeckodriver) pure optGeckoDriver   info [i|firefox: #{firefox}|]   info [i|geckodriver: #{geckoDriver}|]   return $ BrowserDependenciesFirefox firefox geckoDriver@@ -144,7 +144,7 @@        let useChrome = BrowserDependenciesChrome             <$> maybe (getBinaryViaNixPackage @"google-chrome-stable" "google-chrome") pure optChromeBinary-            <*> maybe (getBinaryViaNixPackage @"chromedriver" "chromedriver") pure optChromeDriverBinary+            <*> maybe (getBinaryViaNixPackage @"chromedriver" "chromedriver") pure optChromeDriver        -- let useFirefox = case os of       --       "darwin" -> do@@ -156,7 +156,7 @@        let useFirefox = BrowserDependenciesFirefox             <$> maybe (getBinaryViaNixPackage @"firefox" "firefox") pure optFirefoxBinary-            <*> maybe (getBinaryViaNixPackage @"geckodriver" "geckodriver") pure optGeckoDriverBinary+            <*> maybe (getBinaryViaNixPackage @"geckodriver" "geckodriver") pure optGeckoDriver        deps <- case optBrowserToUse of         Just UseChrome -> useChrome