Finish the documentation for ScheduleChanges.

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

diff --git a/src/TSN/XML/JFile.hs b/src/TSN/XML/JFile.hs
index d2ac6f4db7b35f5793f0c3f946622cee5785d824..fa37e7c636dcd44166284fb005ffccb4e4549d7d 100644 (file)
--- a/src/TSN/XML/JFile.hs
+++ b/src/TSN/XML/JFile.hs
@@ -174,8 +174,8 @@ instance FromXml JFileGameAwayTeamXml where
   from_xml JFileGameAwayTeamXml{..} =
     Team {
       team_id = away_team_id,
-      team_abbreviation = away_team_abbreviation,
-      team_name  = away_team_name }
+      abbreviation = away_team_abbreviation,
+      name  = away_team_name }
 
 -- | Allow us to import JFileGameAwayTeamXml directly.
 instance XmlImport JFileGameAwayTeamXml
@@ -204,8 +204,8 @@ instance FromXml JFileGameHomeTeamXml where
   from_xml JFileGameHomeTeamXml{..} =
     Team {
       team_id = home_team_id,
-      team_abbreviation = home_team_abbreviation,
-      team_name  = home_team_name }
+      abbreviation = home_team_abbreviation,
+      name  = home_team_name }
 
 -- | Allow us to import JFileGameHomeTeamXml directly.
 instance XmlImport JFileGameHomeTeamXml