display active flags in new player/goalie creation summaries

This commit is contained in:
Jonathan Lamothe 2020-02-13 23:30:31 -05:00
parent 439aab99d3
commit 960fbb3443
2 changed files with 2 additions and 0 deletions

View File

@ -75,6 +75,7 @@ confirmCreateGoalieC = Controller
[ ( "Goalie number", maybe "?" show $ cgs^.cgsNumber )
, ( "Goalie name", cgs^.cgsName )
, ( "Rookie", maybe "?" show $ cgs^.cgsRookieFlag )
, ( "Active", maybe "?" show $ cgs^.cgsActiveFlag )
]
++ [ ""
, "Create goalie: are you sure? (Y/N)"

View File

@ -80,6 +80,7 @@ confirmCreatePlayerC = Controller
, ( "Player name", cps^.cpsName )
, ( "Player position", cps^.cpsPosition )
, ( "Rookie", maybe "?" show $ cps^.cpsRookieFlag )
, ( "Active", maybe "?" show $ cps^.cpsActiveFlag )
]
++ [ ""
, "Create player: are you sure? (Y/N)"