diff --git a/src/canopy/canopy.fs b/src/canopy/canopy.fs index e2b33c16..3ff7ed00 100644 --- a/src/canopy/canopy.fs +++ b/src/canopy/canopy.fs @@ -889,6 +889,8 @@ let start b = options.BrowserExecutableLocation <- path new FirefoxDriver(firefoxDriverService (), options, TimeSpan.FromSeconds(elementTimeout)) :> IWebDriver | FirefoxWithUserAgent userAgent -> firefoxWithUserAgent userAgent + | FirefoxWithOptions options -> + new FirefoxDriver(firefoxDriverService (), options, TimeSpan.FromSeconds(elementTimeout)) :> IWebDriver | FirefoxWithPathAndTimeSpan(path, timespan) -> let options = new Firefox.FirefoxOptions() options.BrowserExecutableLocation <- path diff --git a/src/canopy/types.fs b/src/canopy/types.fs index 681b9aee..2f2fb26c 100644 --- a/src/canopy/types.fs +++ b/src/canopy/types.fs @@ -47,6 +47,7 @@ type BrowserStartMode = | FirefoxWithUserAgent of string | FirefoxWithPathAndTimeSpan of string * TimeSpan | FirefoxWithProfileAndTimeSpan of Firefox.FirefoxProfile * TimeSpan + | FirefoxWithOptions of Firefox.FirefoxOptions | FirefoxHeadless | IE | IEWithOptions of IE.InternetExplorerOptions