diff options
Diffstat (limited to 'tests/Hakyll/Web/Util/Html/Tests.hs')
-rw-r--r-- | tests/Hakyll/Web/Util/Html/Tests.hs | 19 |
1 files changed, 13 insertions, 6 deletions
diff --git a/tests/Hakyll/Web/Util/Html/Tests.hs b/tests/Hakyll/Web/Util/Html/Tests.hs index e73c88b..3a99ca7 100644 --- a/tests/Hakyll/Web/Util/Html/Tests.hs +++ b/tests/Hakyll/Web/Util/Html/Tests.hs @@ -1,15 +1,22 @@ +-------------------------------------------------------------------------------- module Hakyll.Web.Util.Html.Tests ( tests ) where -import Test.Framework -import Test.HUnit hiding (Test) -import Hakyll.Web.Util.Html -import TestSuite.Util +-------------------------------------------------------------------------------- +import Test.Framework (Test, testGroup) +import Test.HUnit ((@=?)) -tests :: [Test] -tests = concat + +-------------------------------------------------------------------------------- +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" |