From 1bcce776e786eb6688bace653ecafa1a5a4fb563 Mon Sep 17 00:00:00 2001
From: Jasper Van der Jeugt <m@jaspervdj.be>
Date: Mon, 26 Nov 2012 16:11:37 +0100
Subject: Re-add some tests, cleanup...

---
 tests/Hakyll/Web/Util/Html/Tests.hs | 19 +++++++++++++------
 1 file changed, 13 insertions(+), 6 deletions(-)

(limited to 'tests/Hakyll/Web')

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"
-- 
cgit v1.2.3