fingerprint/mtlstats
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Merge pull request #43 from mtlstats/bugfix-uc-hangs

Browse Source 
bugfix: uppercase prompt hangs
This commit is contained in:
Jonathan Lamothe
2019-12-02 14:34:39 -05:00
committed by GitHub
parent 9e6b71c464 1ca2ffc378
commit 427ad12603
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
src/Mtlstats/Prompt.hs
View File

@@ -123,7 +123,7 @@ ucStrPrompt
-> (String -> Action ()) -> (String -> Action ())
-- ^ The callback function for the result -- ^ The callback function for the result
-> Prompt -> Prompt
ucStrPrompt pStr act = (ucStrPrompt pStr act) ucStrPrompt pStr act = (strPrompt pStr act)
{ promptProcessChar = \ch -> (++ [toUpper ch]) } { promptProcessChar = \ch -> (++ [toUpper ch]) }
-- | Builds a numeric prompt -- | Builds a numeric prompt