From 025eb70c992914fbdf018c189d358ae250d2eeb1 Mon Sep 17 00:00:00 2001 From: Clint Adams Date: Mon, 22 Oct 2012 15:19:04 -0400 Subject: This needs to be cleaned and sanitized before publication. --- tests/main.hs | 22 ++++++++++++++++++++++ 1 file changed, 22 insertions(+) create mode 100644 tests/main.hs (limited to 'tests/main.hs') diff --git a/tests/main.hs b/tests/main.hs new file mode 100644 index 0000000..d475fe8 --- /dev/null +++ b/tests/main.hs @@ -0,0 +1,22 @@ +{-# LANGUAGE OverloadedStrings #-} +{-# LANGUAGE NoMonomorphismRestriction #-} +{-# OPTIONS_GHC -fno-warn-orphans #-} + +module Main where + +import Import +import Settings +import Yesod.Logger (defaultDevelopmentLogger) +import Yesod.Default.Config +import Yesod.Test +import Application (makeFoundation) + +import HomeTest + +main :: IO a +main = do + conf <- loadConfig $ (configSettings Testing) { csParseExtra = parseExtra } + logger <- defaultDevelopmentLogger + foundation <- makeFoundation conf logger + app <- toWaiAppPlain foundation + runTests app (connPool foundation) homeSpecs -- cgit v1.2.3