fingerprint/mtlstats
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

renamed editPlayer to editPlayerC

Browse Source
This commit is contained in:
Jonathan Lamothe
2019-11-01 03:49:41 -04:00
parent 20ee194035
commit cb4fc77dd6
2 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Mtlstats/Control.hs
View File

@@ -71,7 +71,7 @@ dispatch s = case s^.progMode of
| null $ cgs^.cgsNumber -> getGoalieNumC | null $ cgs^.cgsNumber -> getGoalieNumC
| null $ cgs^.cgsName -> getGoalieNameC | null $ cgs^.cgsName -> getGoalieNameC
| otherwise -> confirmCreateGoalieC | otherwise -> confirmCreateGoalieC
EditPlayer eps -> editPlayer eps EditPlayer eps -> editPlayerC eps
mainMenuC :: Controller mainMenuC :: Controller
mainMenuC = Controller mainMenuC = Controller

6
src/Mtlstats/Control/EditPlayer.hs
View File

@@ -19,7 +19,7 @@ along with this program. If not, see <https://www.gnu.org/licenses/>.
-} -}
module Mtlstats.Control.EditPlayer (editPlayer) where module Mtlstats.Control.EditPlayer (editPlayerC) where
import Lens.Micro ((^.)) import Lens.Micro ((^.))
@@ -27,8 +27,8 @@ import Mtlstats.Prompt
import Mtlstats.Types import Mtlstats.Types
-- | Dispatcher/controller for the player edit mode -- | Dispatcher/controller for the player edit mode
editPlayer :: EditPlayerState -> Controller editPlayerC :: EditPlayerState -> Controller
editPlayer eps editPlayerC eps
| null $ eps^.epsSelectedPlayer = selectPlayerC | null $ eps^.epsSelectedPlayer = selectPlayerC
| otherwise = undefined | otherwise = undefined