Bugfix: filtering squad goal counter to games in specific event.

master
Ben Burlingham 9 years ago
parent c5844ad6a6
commit 5d0b1dac38
  1. 2
      Worldcup/Tourneys.hs
  2. 2
      worldcup.json

@ -43,5 +43,5 @@ buildTourneys :: Countries -> Rounds -> [EventTeam] -> Teams -> [Game] -> [Event
buildTourneys cs rs ets ts gs = foldl reducer HM.empty where
reducer acc x = HM.insert (getEvent x) (Tourney (getGames x) (getSquads x)) acc
getGames x = gamesFromEventId (eventId x) rs gs
getSquads x = buildSquads cs gs ts (teamIdsFromEventId (eventId x) ets)
getSquads x = buildSquads cs (getGames x) ts (teamIdsFromEventId (eventId x) ets)
getEvent x = drop 6 (eventName x)

File diff suppressed because one or more lines are too long
Loading…
Cancel
Save