haskell/yesod
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Add since tag

Browse Source
This commit is contained in:
Amitaibu 2016-09-01 14:20:29 +03:00
parent ac0229dff0
commit 6ddfd07032
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
yesod-test/Yesod/Test.hs
View File

@ -398,6 +398,7 @@ bodyContains text = withResponse $ \ res ->
-- | Assert the last response doesn't have the given text. The check is performed using the response -- | Assert the last response doesn't have the given text. The check is performed using the response
-- body in full text form. -- body in full text form.
-- @since 1.5.3
bodyNotContains :: String -> YesodExample site () bodyNotContains :: String -> YesodExample site ()
bodyNotContains text = withResponse $ \ res -> bodyNotContains text = withResponse $ \ res ->
liftIO $ HUnit.assertBool ("Expected body not to contain " ++ text) $ liftIO $ HUnit.assertBool ("Expected body not to contain " ++ text) $