Move the FromXmlFkTeams class out of Xml and into TSN.Team.

[dead/htsn-import.git] / src / TSN / XML / Odds.hs

diff --git a/src/TSN/XML/Odds.hs b/src/TSN/XML/Odds.hs
index e2ef142b45b272d81ad3dec7b3beda312abb9554..fed7fa11a3fcc6066e3b2eda4c184c0039dba9f5 100644 (file)
--- a/src/TSN/XML/Odds.hs
+++ b/src/TSN/XML/Odds.hs
@@ -65,12 +65,11 @@ import TSN.Codegen (
   tsn_codegen_config )
 import TSN.DbImport ( DbImport(..), ImportResult(..), run_dbmigrate )
 import TSN.Picklers ( xp_date_padded, xp_time, xp_time_stamp )
-import TSN.Team ( Team(..) )
+import TSN.Team ( FromXmlFkTeams(..), Team(..) )
 import TSN.XmlImport ( XmlImport(..), XmlImportFkTeams(..) )
 import Xml (
   Child(..),
   FromXml(..),
-  FromXmlFkTeams(..),
   ToDb(..),
   pickle_unpickle,
   unpickleable,
@@ -450,7 +449,7 @@ mkPersist tsn_codegen_config [groundhog|
   constructors:
     - name: OddsCasino
       uniques:
-        - name: unique_odds_casino
+        - name: unique_odds_casinos
           type: constraint
           fields: [casino_client_id]
 
@@ -624,13 +623,13 @@ pickle_starter =
 -- | Pickler for an home team 'OddsGameTeamStarterXml'
 --
 pickle_home_starter :: PU OddsGameTeamStarterXml
-pickle_home_starter = xpElem "HStarter" $ pickle_starter
+pickle_home_starter = xpElem "HStarter" pickle_starter
 
 
 -- | Pickler for an away team 'OddsGameTeamStarterXml'
 --
 pickle_away_starter :: PU OddsGameTeamStarterXml
-pickle_away_starter = xpElem "AStarter" $ pickle_starter
+pickle_away_starter = xpElem "AStarter" pickle_starter