implemented goalieNumPrompt

This commit is contained in:
Jonathan Lamothe 2019-10-25 00:11:26 -04:00
parent a9b5ada114
commit ec914a38b1

View File

@ -247,7 +247,8 @@ assignPMinsPrompt = numPrompt "Penalty minutes: " $
modify . assignPMins
goalieNumPrompt :: Prompt
goalieNumPrompt = undefined
goalieNumPrompt = numPrompt "Goalie number: " $
modify . (progMode.createGoalieStateL.cgsNumber ?~)
drawSimplePrompt :: String -> ProgState -> C.Update ()
drawSimplePrompt pStr s = C.drawString $ pStr ++ s^.inputBuffer