force capitalization in ucStrPrompt

ChangeLog.md

@@ -1,9 +1,12 @@
 # Changelog for mtlstats
 
 ## current
-- updated code to use brick instead of ncurses
+- fixed autocapitalization
 
 ## 0.17.0
+- updated code to use brick instead of ncurses
+
+## 0.16.1
 - Don't automatically start a new game on new season
 
 ## 0.16.0

src/Mtlstats/Prompt.hs

@@ -127,7 +127,7 @@ ucStrPrompt
   -- ^ The callback function for the result
   -> Prompt
 ucStrPrompt pStr act = (strPrompt pStr act)
-  { promptProcessChar = \ch -> editContentsL %~ insertChar ch }
+  { promptProcessChar = \ch -> editContentsL %~ insertChar (toUpper ch) }
 
 -- | Creates a prompt which forces capitalization of input to
 -- accomodate a player or goalie name