X-Git-Url: http://gitweb.michael.orlitzky.com/?a=blobdiff_plain;f=src%2FTSN%2FInjuries.hs;h=3877c12efc551a5e6c55ee3bed5d2354e5be7b6e;hb=767dc8dbacaf6dcdefd268c7c8c08cd0c23c3391;hp=4809786b2906523ff06850e2e20b45a55c9fffb5;hpb=923d7c7415ee29be4b0b16829483fad07557f498;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,