X-Git-Url: http://gitweb.michael.orlitzky.com/?p=dead%2Fhalcyon.git;a=blobdiff_plain;f=test%2FTestSuite.hs;h=4fa222dfbfa1bd87dcf2f97bc80f82b33de5da56;hp=f583ca19ac464bbcf89d232b92c2d8028b00acaa;hb=bbd3f429da0e9e5906f6aecb85f1c00683500428;hpb=5902136562aa412e2e1a54773e9cd3810bb8aa75 diff --git a/test/TestSuite.hs b/test/TestSuite.hs index f583ca1..4fa222d 100644 --- a/test/TestSuite.hs +++ b/test/TestSuite.hs @@ -2,14 +2,14 @@ import Test.HUnit import StringUtils (string_utils_tests) import Twitter.Status(status_tests) -import Twitter.Xml(xml_tests) +import Html(html_tests) -- The list of HUnit tests. -test_suite = TestList (concat [xml_tests, status_tests, string_utils_tests]) +test_suite = TestList (concat [html_tests, status_tests, string_utils_tests]) main :: IO () main = do putStrLn "HUnit" putStrLn "-----" runTestTT test_suite - return () \ No newline at end of file + return ()