X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTSN%2FXML%2FGameInfo.hs;h=fdc11aed440408a5e7cff1423d76f31e2b56a9d6;hb=f2822a93d9f78a2f4c16b272f905b3c36bb4870d;hp=dcff90c572876a45b8089502b739b1a5c8abb2d0;hpb=2642b213e183b3dd0620ff88787e2437a9ee8aee;p=dead%2Fhtsn-import.git

diff --git a/src/TSN/XML/GameInfo.hs b/src/TSN/XML/GameInfo.hs
index dcff90c..fdc11ae 100644
--- a/src/TSN/XML/GameInfo.hs
+++ b/src/TSN/XML/GameInfo.hs
@@ -60,17 +60,12 @@ import Xml (
 --   make sure that we are really receiving XML for these DTDs
 --   (i.e. the names are correct).
 --
---   Those marked \"TSN DTD\" are the ones for which we did not
---   receive any XML during implementation; therefore the TSN DTD was
---   used. This matters because it is almost certainly incorrect, so
---   we can expect import failures when we finally do see some XML.
---
 dtds :: [String]
 dtds =
-  [ "CBASK_Lineup_XML.dtd", -- TSN DTD
-    "cbaskpreviewxml.dtd", -- missing DTD
-    "cflpreviewxml.dtd", -- missing DTD
-    "Matchup_NBA_NHL_XML.dtd", -- missing DTD
+  [ "CBASK_Lineup_XML.dtd",
+    "cbaskpreviewxml.dtd",
+    "cflpreviewxml.dtd",
+    "Matchup_NBA_NHL_XML.dtd",
     "mlbpreviewxml.dtd",
     "MLB_Gaming_Matchup_XML.dtd",
     "MLB.dtd", -- missing DTD
@@ -192,6 +187,9 @@ gameinfo_tests =
 gameinfo_test_files :: [FilePath]
 gameinfo_test_files =
   [ "test/xml/gameinfo/CBASK_Lineup_XML.xml",
+    "test/xml/gameinfo/cbaskpreviewxml.xml",
+    "test/xml/gameinfo/cflpreviewxml.xml",
+    "test/xml/gameinfo/Matchup_NBA_NHL_XML.xml",
     "test/xml/gameinfo/MLB_Gaming_Matchup_XML.xml",
     "test/xml/gameinfo/MLB_Lineup_XML.xml",
     "test/xml/gameinfo/MLB_Matchup_XML.xml",