From 75abf0ade80d3c7c222764c82acd4ed464a6b70f Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jlamothe1980@gmail.com>
Date: Tue, 12 Nov 2019 23:51:49 -0500
Subject: [PATCH] implemented Mtlstats.Control.EditGoalie.numberC

---
 src/Mtlstats/Control/EditGoalie.hs | 2 +-
 src/Mtlstats/Prompt/EditGoalie.hs  | 9 ++++++++-
 2 files changed, 9 insertions(+), 2 deletions(-)

diff --git a/src/Mtlstats/Control/EditGoalie.hs b/src/Mtlstats/Control/EditGoalie.hs
index e4fcc8c..52653c2 100644
--- a/src/Mtlstats/Control/EditGoalie.hs
+++ b/src/Mtlstats/Control/EditGoalie.hs
@@ -67,7 +67,7 @@ menuC :: Controller
 menuC = menuControllerWith header editGoalieMenu
 
 numberC :: Controller
-numberC = undefined
+numberC = promptController editGoalieNumberPrompt
 
 nameC :: Controller
 nameC = undefined
diff --git a/src/Mtlstats/Prompt/EditGoalie.hs b/src/Mtlstats/Prompt/EditGoalie.hs
index 99f9c26..b70e4b6 100644
--- a/src/Mtlstats/Prompt/EditGoalie.hs
+++ b/src/Mtlstats/Prompt/EditGoalie.hs
@@ -19,7 +19,10 @@ along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
 -}
 
-module Mtlstats.Prompt.EditGoalie (goalieToEditPrompt) where
+module Mtlstats.Prompt.EditGoalie
+  ( goalieToEditPrompt
+  , editGoalieNumberPrompt
+  ) where
 
 import Control.Monad.Trans.State (modify)
 import Lens.Micro ((.~))
@@ -31,3 +34,7 @@ import Mtlstats.Types
 goalieToEditPrompt :: Prompt
 goalieToEditPrompt = selectGoaliePrompt "Goalie to edit: " $
   modify . (progMode.editGoalieStateL.egsSelectedGoalie .~)
+
+-- | Prompt to edit a goalie's number
+editGoalieNumberPrompt :: Prompt
+editGoalieNumberPrompt = undefined