diff options
Diffstat (limited to 'tests/Hakyll/Web/Html/Tests.hs')
| -rw-r--r-- | tests/Hakyll/Web/Html/Tests.hs | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/tests/Hakyll/Web/Html/Tests.hs b/tests/Hakyll/Web/Html/Tests.hs index efb4099..3d0a887 100644 --- a/tests/Hakyll/Web/Html/Tests.hs +++ b/tests/Hakyll/Web/Html/Tests.hs @@ -7,7 +7,7 @@ module Hakyll.Web.Html.Tests -------------------------------------------------------------------------------- import Data.Char (toUpper) import Test.Tasty (TestTree, testGroup) -import Test.Tasty.HUnit (assert, (@=?)) +import Test.Tasty.HUnit ((@=?)) -------------------------------------------------------------------------------- @@ -64,11 +64,11 @@ tests = testGroup "Hakyll.Web.Html.Tests" $ concat ] , fromAssertions "isExternal" - [ assert (isExternal "http://reddit.com") - , assert (isExternal "https://mail.google.com") - , assert (isExternal "//ajax.googleapis.com") - , assert (not (isExternal "../header.png")) - , assert (not (isExternal "/foo/index.html")) + [ True @=? isExternal "http://reddit.com" + , True @=? isExternal "https://mail.google.com" + , True @=? isExternal "//ajax.googleapis.com" + , False @=? isExternal "../header.png" + , False @=? isExternal "/foo/index.html" ] , fromAssertions "stripTags" |