hspec-webdriver 1.0.1 → 1.0.2
raw patch · 3 files changed
+13/−9 lines, 3 filesdep ~webdriverPVP ok
version bump matches the API change (PVP)
Dependency ranges changed: webdriver
API changes (from Hackage documentation)
Files
- Changelog.md +4/−0
- Test/Hspec/WebDriver.hs +7/−7
- hspec-webdriver.cabal +2/−2
Changelog.md view
@@ -1,3 +1,7 @@+## 1.0.2++* Fix so that the package builds against webdriver 0.6.1+ ## 1.0.1 * Increase upper bound on hspec to allow hspec 2.1
Test/Hspec/WebDriver.hs view
@@ -76,8 +76,8 @@ , module Test.WebDriver.Commands ) where -import Control.Applicative-import Control.Concurrent.MVar+import Control.Applicative ((<$>), Applicative)+import Control.Concurrent.MVar (MVar, takeMVar, putMVar, newEmptyMVar) import Control.Exception (SomeException(..)) import Control.Exception.Lifted (try, Exception, onException, throwIO) import Control.Monad (replicateM)@@ -85,7 +85,7 @@ import Control.Monad.Trans.State (state, evalState, execState) import Data.Default (Default(..)) import Data.Typeable (Typeable, cast)-import Data.IORef+import Data.IORef (newIORef, writeIORef, readIORef) import Data.Traversable (traverse) import Test.HUnit (assertEqual, assertFailure) import qualified Data.Text as T@@ -162,7 +162,7 @@ -- expectations> in this module. It is possible to split up the spec of a single page into multiple -- examples where later examples start with the web browser state from the end of the previous -- example. This is helpful to keep each individual example small and allows the entire spec to be--- described at the beginning with pending examples. +-- described at the beginning with pending examples. -- -- The way this works is that you combine examples into a session using 'session' or 'sessionWith'. -- A webdriver session is then threaded through all examples in a session so that a later example in@@ -346,7 +346,7 @@ create = do s <- W.mkSession cfg- W.runWD s $ createSession $ W.wdCapabilities cfg+ W.runWD s $ createSession [] $ W.wdCapabilities cfg close st | length mvars - 1 == n = mapM_ ((`W.runWD` closeSession) . snd) $ stSessionMap st | otherwise = putMVar (mvars !! (n + 1)) st@@ -357,7 +357,7 @@ where act' f () = f (createTestSession cfg mvars n) --- | Convert a spec tree of test items to a spec tree of generic items by creating a single session for +-- | Convert a spec tree of test items to a spec tree of generic items by creating a single session for -- the entire tree. procTestSession :: TestCapabilities cap => W.WDConfig -> cap -> SpecWith (WdTestSession multi) -> Spec@@ -368,7 +368,7 @@ let cnt = countItems trees mvars <- replicateM cnt newEmptyMVar return (mvars, cap, trees)- + fromSpecList $ mapWithCounter (procSpecItem cfg {W.wdCapabilities = cap} mvars) trees instance Eq multi => Example (WdExample multi) where
hspec-webdriver.cabal view
@@ -1,5 +1,5 @@ name: hspec-webdriver-version: 1.0.1+version: 1.0.2 cabal-version: >= 1.8 build-type: Simple synopsis: Write end2end web application tests using webdriver and hspec@@ -39,4 +39,4 @@ , text >= 0.11 , transformers >= 0.3 , unordered-containers >= 0.2- , webdriver >= 0.6 && < 0.7+ , webdriver >= 0.6.1 && < 0.7