diff options
Diffstat (limited to 'tests/Hakyll/Web/Util/Html/Tests.hs')
-rw-r--r-- | tests/Hakyll/Web/Util/Html/Tests.hs | 29 |
1 files changed, 0 insertions, 29 deletions
diff --git a/tests/Hakyll/Web/Util/Html/Tests.hs b/tests/Hakyll/Web/Util/Html/Tests.hs deleted file mode 100644 index 3a99ca7..0000000 --- a/tests/Hakyll/Web/Util/Html/Tests.hs +++ /dev/null @@ -1,29 +0,0 @@ --------------------------------------------------------------------------------- -module Hakyll.Web.Util.Html.Tests - ( tests - ) where - - --------------------------------------------------------------------------------- -import Test.Framework (Test, testGroup) -import Test.HUnit ((@=?)) - - --------------------------------------------------------------------------------- -import Hakyll.Web.Util.Html -import TestSuite.Util - - --------------------------------------------------------------------------------- -tests :: Test -tests = testGroup "Hakyll.Web.Util.Html" $ concat - [ fromAssertions "stripTags" - [ "foo" @=? stripTags "<p>foo</p>" - , "foo bar" @=? stripTags "<p>foo</p> bar" - , "foo" @=? stripTags "<p>foo</p" - ] - , fromAssertions "escapeHtml" - [ "Me & Dean" @=? escapeHtml "Me & Dean" - , "<img>" @=? escapeHtml "<img>" - ] - ] |