Merge pull request #456 from sol/master

Fix deprecation warnings
This commit is contained in:
Michael Snoyman 2012-11-28 11:56:22 -08:00
commit 6d63c680aa
2 changed files with 4 additions and 3 deletions

View File

@ -81,6 +81,7 @@ where
import qualified Test.Hspec ()
import qualified Test.Hspec.Core as Core
import qualified Test.Hspec.Runner as Runner
import qualified Data.List as DL
import qualified Data.Maybe as DY
import qualified Data.ByteString.Char8 as BS8
@ -108,7 +109,7 @@ import Data.Conduit.Pool (Pool)
import Control.Monad.Trans.Control (MonadBaseControl)
-- | The state used in 'describe' to build a list of specs
data SpecsData conn = SpecsData Application (Pool conn) [Core.Spec]
data SpecsData conn = SpecsData Application (Pool conn) [Core.SpecTree]
-- | The specs state monad is where 'describe' runs.
-- parameterized by a database connection.
@ -156,7 +157,7 @@ type CookieValue = ByteString
runTests :: Application -> Pool conn -> SpecsConn conn -> IO ()
runTests app connection specsDef = do
(SpecsData _ _ specs) <- ST.execStateT specsDef (SpecsData app connection [])
Core.hspec specs
(Runner.hspec . Core.fromSpecList) specs
-- | Start describing a Tests suite keeping cookies and a reference to the tested 'Application'
-- and 'ConnectionPool'

View File

@ -23,7 +23,7 @@ library
, network >= 2.2
, http-types >= 0.7 && < 0.8
, HUnit >= 1.2 && < 1.3
, hspec >= 1.3
, hspec >= 1.4
, bytestring >= 0.9
, case-insensitive >= 0.2
, text