implemented editGoalieNamePrompt

src/Mtlstats/Actions/EditGoalie.hs

@@ -21,6 +21,7 @@ along with this program.  If not, see <https://www.gnu.org/licenses/>.
 
 module Mtlstats.Actions.EditGoalie
   ( editGoalieNumber
+  , editGoalieName
   ) where
 
 import Control.Monad (void)
@@ -43,3 +44,11 @@ editGoalieNumber n s = fromMaybe s $ do
   Just $ s
     & database.dbGoalies %~ modifyNth gid updateGoalie
     & progMode.editGoalieStateL.egsMode .~ EGMenu
+
+-- | Edits a goalie's name
+editGoalieName
+  :: String
+  -- ^ The new name
+  -> ProgState
+  -> ProgState
+editGoalieName = undefined

src/Mtlstats/Prompt/EditGoalie.hs

@@ -44,4 +44,5 @@ editGoalieNumberPrompt = numPrompt "Goalie number: " $
 
 -- | Prompt to edit a goalie's name
 editGoalieNamePrompt :: Prompt
-editGoalieNamePrompt = undefined
+editGoalieNamePrompt = strPrompt "Goalie name: " $
+  modify . editGoalieName