From 20ee194035dbbdfb18af37abd1871d8ef515d14c Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jlamothe1980@gmail.com>
Date: Fri, 1 Nov 2019 03:44:03 -0400
Subject: [PATCH] implemented playerToEditPrompt

---
 src/Mtlstats/Prompt.hs | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/Mtlstats/Prompt.hs b/src/Mtlstats/Prompt.hs
index fa8e358..97aab82 100644
--- a/src/Mtlstats/Prompt.hs
+++ b/src/Mtlstats/Prompt.hs
@@ -329,7 +329,8 @@ goalsAllowedPrompt = numPrompt "Goals allowed: " $ \n -> do
   modify recordGoalieStats
 
 playerToEditPrompt :: Prompt
-playerToEditPrompt = undefined
+playerToEditPrompt = selectPlayerPrompt "Player to edit: " $
+  modify . (progMode.editPlayerStateL.epsSelectedPlayer .~)
 
 drawSimplePrompt :: String -> ProgState -> C.Update ()
 drawSimplePrompt pStr s = C.drawString $ pStr ++ s^.inputBuffer