X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTSN%2FInjuries.hs;h=3877c12efc551a5e6c55ee3bed5d2354e5be7b6e;hb=9d278c8b8eeff1a1317f2c3b0f7fdf5fb759ffb3;hp=4809786b2906523ff06850e2e20b45a55c9fffb5;hpb=dd4d3adf452823702f3376d1869b07e39f03bff2;p=dead%2Fhtsn-import.git diff --git a/src/TSN/Injuries.hs b/src/TSN/Injuries.hs index 4809786..3877c12 100644 --- 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,