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

diff --git a/src/TSN/XML/GameInfo.hs b/src/TSN/XML/GameInfo.hs
index f5b64e3..dcff90c 100644
--- a/src/TSN/XML/GameInfo.hs
+++ b/src/TSN/XML/GameInfo.hs
@@ -60,9 +60,14 @@ 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", -- missing DTD
+  [ "CBASK_Lineup_XML.dtd", -- TSN DTD
     "cbaskpreviewxml.dtd", -- missing DTD
     "cflpreviewxml.dtd", -- missing DTD
     "Matchup_NBA_NHL_XML.dtd", -- missing DTD
@@ -186,7 +191,8 @@ gameinfo_tests =
 --
 gameinfo_test_files :: [FilePath]
 gameinfo_test_files =
-  [ "test/xml/gameinfo/MLB_Gaming_Matchup_XML.xml",
+  [ "test/xml/gameinfo/CBASK_Lineup_XML.xml",
+    "test/xml/gameinfo/MLB_Gaming_Matchup_XML.xml",
     "test/xml/gameinfo/MLB_Lineup_XML.xml",
     "test/xml/gameinfo/MLB_Matchup_XML.xml",
     "test/xml/gameinfo/mlbpreviewxml.xml",