Use hyphens instead of underscores in access-token et al.

[dead/halcyon.git] / test / TestSuite.hs

import Test.HUnit

import StringUtils (string_utils_tests)
import Twitter.Status(status_tests)
import Html(html_tests)

-- The list of HUnit tests.
test_suite = TestList (concat [html_tests, status_tests, string_utils_tests])

main :: IO ()
main = do
  putStrLn "HUnit"
  putStrLn "-----"
  runTestTT test_suite
  return ()