From aac2752e9515f1a9260f6a87da9af4116e88e502 Mon Sep 17 00:00:00 2001
From: Jonathan Lamothe <jlamothe1980@gmail.com>
Date: Thu, 14 Nov 2019 02:55:50 -0500
Subject: [PATCH] implemented Mtlstats.Control.EditGoalie.ltTiesC

---
 src/Mtlstats/Control/EditGoalie.hs | 2 +-
 src/Mtlstats/Prompt/EditGoalie.hs  | 5 +++++
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/src/Mtlstats/Control/EditGoalie.hs b/src/Mtlstats/Control/EditGoalie.hs
index ae882ca..094ac09 100644
--- a/src/Mtlstats/Control/EditGoalie.hs
+++ b/src/Mtlstats/Control/EditGoalie.hs
@@ -112,7 +112,7 @@ ltLossesC :: Controller
 ltLossesC = promptController editGoalieLtLossesPrompt
 
 ltTiesC :: Controller
-ltTiesC = undefined
+ltTiesC = promptController editGoalieLtTiesPrompt
 
 header :: ProgState -> C.Update ()
 header s = C.drawString $ fromMaybe "" $ do
diff --git a/src/Mtlstats/Prompt/EditGoalie.hs b/src/Mtlstats/Prompt/EditGoalie.hs
index 843e63e..7d69d1e 100644
--- a/src/Mtlstats/Prompt/EditGoalie.hs
+++ b/src/Mtlstats/Prompt/EditGoalie.hs
@@ -34,6 +34,7 @@ module Mtlstats.Prompt.EditGoalie
   , editGoalieLtGoalsPrompt
   , editGoalieLtWinsPrompt
   , editGoalieLtLossesPrompt
+  , editGoalieLtTiesPrompt
   ) where
 
 import Control.Monad.Trans.State (modify)
@@ -112,3 +113,7 @@ editGoalieLtWinsPrompt = numPrompt "Lifetime wins: " $
 editGoalieLtLossesPrompt :: Prompt
 editGoalieLtLossesPrompt = numPrompt "Lifetime losses: " $
   modify . editGoalieLtLosses
+
+-- | Prompt to edit a goalie's lifetime ties
+editGoalieLtTiesPrompt :: Prompt
+editGoalieLtTiesPrompt = undefined