import Data.Time ( UTCTime )
import Data.Tuple.Curry ( uncurryN )
import Database.Groundhog()
-import Database.Groundhog.TH
+import Database.Groundhog.TH (
+ defaultCodegenConfig,
+ groundhog,
+ mkPersist )
import Test.Tasty ( TestTree, testGroup )
import Test.Tasty.HUnit ( (@?=), testCase )
import Text.XML.HXT.Core (
xpText0,
xpWrap )
+import TSN.DbImport ( DbImport(..), import_generic )
import TSN.Picklers( xp_date, xp_team_id )
import Xml ( pickle_unpickle )
instance XmlPickler Message where
xpickle = pickle_message
+instance DbImport PlayerListing where
+ dbimport = import_generic ( (concatMap player_listings) . listings)
+
-- * Tasty Tests
injuries_detail_tests :: TestTree