Implement database insertion (generically!).

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

diff --git a/src/TSN/Injuries.hs b/src/TSN/Injuries.hs
index 4809786b2906523ff06850e2e20b45a55c9fffb5..3877c12efc551a5e6c55ee3bed5d2354e5be7b6e 100644 (file)
--- a/src/TSN/Injuries.hs
+++ b/src/TSN/Injuries.hs
@@ -13,7 +13,8 @@
 --   automatically. The root message is not retained.
 --
 module TSN.Injuries (
-  Message )
+  Listing,
+  Message( listings ) )
 where
 
 import Data.Tuple.Curry ( uncurryN )
@@ -31,7 +32,6 @@ import Text.XML.HXT.Core (
   xpWrap )
 
 
-
 data Listing =
   Listing {
     team :: String,