implemented selectGameGoalieC

2019-11-04 04:12:20 -05:00
parent d708bed77d
commit 4910200c96
4 changed files with 54 additions and 10 deletions
@@ -60,7 +60,7 @@ dispatch s = case s^.progMode of
    | fromJust (unaccountedPoints gs) -> goalInput gs
    | isJust $ gs^.gameSelectedPlayer -> getPMinsC
    | not $ gs^.gamePMinsRecorded     -> pMinPlayerC
-    | not $ gs^.gameGoalieAssigned    -> goalieInput gs
+    | not $ gs^.gameGoalieAssigned    -> goalieInput s
    | otherwise                       -> reportC
  CreatePlayer cps
    | null $ cps^.cpsNumber   -> getPlayerNumC