renamed GameState fields to prevent name collisions

2019-11-04 01:48:47 -05:00
parent 3f38160abd
commit 43f3d9eb08
6 changed files with 69 additions and 69 deletions
@@ -33,9 +33,9 @@ import Mtlstats.Util
 -- | The dispatcher for handling goalie input
 goalieInput :: GameState -> Controller
 goalieInput gs
-  | null $ gs^.gameSelectedGoalie = selectGoalieC
-  | null $ gs^.goalieMinsPlayed   = minsPlayedC
-  | otherwise                     = goalsAllowedC
+  | null $ gs^.gameSelectedGoalie   = selectGoalieC
+  | null $ gs^.gameGoalieMinsPlayed = minsPlayedC
+  | otherwise                       = goalsAllowedC

 selectGoalieC :: Controller
 selectGoalieC = Controller