bump hspec dependency
This commit is contained in:
parent
be372022ec
commit
4bcfe87582
@ -62,7 +62,7 @@ getBarR, getPlainR :: Handler RepPlain
|
||||
getBarR = return $ RepPlain "bar"
|
||||
getPlainR = return $ RepPlain "plain"
|
||||
|
||||
cleanPathTest :: IO [IO Spec]
|
||||
cleanPathTest :: [Spec]
|
||||
cleanPathTest =
|
||||
describe "Test.CleanPath"
|
||||
[ it "remove trailing slash" removeTrailingSlash
|
||||
|
||||
@ -22,7 +22,7 @@ instance Yesod Y where
|
||||
getRootR :: Handler ()
|
||||
getRootR = error "FOOBAR" >> return ()
|
||||
|
||||
exceptionsTest :: IO [IO Spec]
|
||||
exceptionsTest :: [Spec]
|
||||
exceptionsTest = describe "Test.Exceptions"
|
||||
[ it "500" case500
|
||||
]
|
||||
|
||||
@ -21,7 +21,7 @@ instance Yesod Y where
|
||||
getRootR :: Handler RepHtml
|
||||
getRootR = defaultLayout $ addHamlet [hamlet|<a href=@{RootR}>|]
|
||||
|
||||
linksTest :: IO [IO Spec]
|
||||
linksTest :: [Spec]
|
||||
linksTest = describe "Test.Links"
|
||||
[ it "linkToHome" case_linkToHome
|
||||
]
|
||||
|
||||
@ -52,7 +52,7 @@ caseMediaLink = runner $ do
|
||||
assertStatus 200 res
|
||||
flip assertBody res "<!DOCTYPE html>\n<html><head><title></title><link rel=\"stylesheet\" href=\"all.css\"><link rel=\"stylesheet\" media=\"screen\" href=\"screen.css\"></head><body></body></html>"
|
||||
|
||||
mediaTest :: IO [IO Spec]
|
||||
mediaTest :: [Spec]
|
||||
mediaTest = describe "Test.Media"
|
||||
[ it "media" caseMedia
|
||||
, it "media link" caseMediaLink
|
||||
|
||||
@ -46,7 +46,7 @@ case_sanity = runner $ do
|
||||
res <- request defaultRequest
|
||||
assertBody mempty res
|
||||
|
||||
noOverloadedTest :: IO [IO Spec]
|
||||
noOverloadedTest :: [Spec]
|
||||
noOverloadedTest = describe "Test.NoOverloadedStrings"
|
||||
[ it "sanity" case_sanity
|
||||
]
|
||||
|
||||
@ -69,7 +69,7 @@ getWhamletR = defaultLayout [whamlet|
|
||||
where
|
||||
embed = [whamlet|<h4>Embed|]
|
||||
|
||||
widgetTest :: IO [IO Spec]
|
||||
widgetTest :: [Spec]
|
||||
widgetTest = describe "Test.Widget"
|
||||
[ it "addJuliusBody" case_addJuliusBody
|
||||
, it "whamlet" case_whamlet
|
||||
|
||||
@ -91,7 +91,7 @@ test-suite runtests
|
||||
build-depends: base >= 4 && < 4.3
|
||||
main-is: main.hs
|
||||
cpp-options: -DTEST
|
||||
build-depends: hspec >= 0.6.1 && < 0.7
|
||||
build-depends: hspec >= 0.8 && < 0.9
|
||||
,wai-test
|
||||
,wai
|
||||
,yesod-core
|
||||
|
||||
@ -6,7 +6,8 @@ import Test.Hspec.HUnit ()
|
||||
-- import Test.Hspec.QuickCheck (prop)
|
||||
|
||||
main :: IO ()
|
||||
main = hspecX $ return [] {- FIXME specs
|
||||
main = return () -- hspecX $ return []
|
||||
{- FIXME specs
|
||||
|
||||
specs :: IO [Spec]
|
||||
specs = runSpecM $ do
|
||||
|
||||
@ -48,7 +48,7 @@ test-suite runtests
|
||||
type: exitcode-stdio-1.0
|
||||
|
||||
build-depends: base >= 4 && < 5
|
||||
, hspec >= 0.6.1 && < 0.7
|
||||
, hspec >= 0.8 && < 0.9
|
||||
, HUnit
|
||||
, unix-compat >= 0.2 && < 0.3
|
||||
, time >= 1.1.4 && < 1.3
|
||||
|
||||
@ -44,7 +44,7 @@ test-suite runtests
|
||||
cpp-options: -DTEST
|
||||
build-depends: yesod-static
|
||||
, base >= 4 && < 5
|
||||
, hspec >= 0.6.1 && < 0.7
|
||||
, hspec >= 0.8 && < 0.9
|
||||
, HUnit
|
||||
ghc-options: -Wall
|
||||
main-is: runtests.hs
|
||||
|
||||
Loading…
Reference in New Issue
Block a user