Fix a bug in the AutoRacingResults template Haskell.

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

diff --git a/src/TSN/XML/SportInfo.hs b/src/TSN/XML/SportInfo.hs
index 36dd28af9bf1fdb04824bd3322b4e6a03f3692d1..d47f1c1ba88ef6ebd2be2c0659b8bdab9e7630ee 100644 (file)
--- a/src/TSN/XML/SportInfo.hs
+++ b/src/TSN/XML/SportInfo.hs
@@ -58,7 +58,7 @@ import Xml (
   unsafe_read_document )
 
 
--- | The DTDs for everything that we consider "Sport Info."
+-- | The DTDs for everything that we consider \"Sport Info.\"
 --
 --   TODO: This is the list from the old implementation. We need to
 --   make sure that we are really receiving XML for these DTDs
@@ -70,7 +70,7 @@ dtds =
     "Cbask_All_Tourn_Teams_XML.dtd",
     "CBASK_AssistsXML.dtd",
     "Cbask_Awards_XML.dtd",
-    "CBASK_BlocksXML.dtd", -- no dtd
+    "CBASK_BlocksXML.dtd",
     "Cbask_Conf_Standings_XML.dtd", -- no dtd
     "Cbask_DivII_III_Indv_Stats_XML.dtd", -- no dtd
     "Cbask_DivII_Team_Stats_XML.dtd", -- no dtd
@@ -319,7 +319,8 @@ sportinfo_test_files =
   [ "test/xml/sportinfo/CBASK_3PPctXML.xml",
     "test/xml/sportinfo/Cbask_All_Tourn_Teams_XML.xml",
     "test/xml/sportinfo/CBASK_AssistsXML.xml",
-    "test/xml/sportinfo/Cbask_Awards_XML.xml"
+    "test/xml/sportinfo/Cbask_Awards_XML.xml",
+    "test/xml/sportinfo/CBASK_BlocksXML.xml"
   ]