X-Git-Url: https://glassweightruler.freedombox.rocks/gitweb/xdg-ninja.git/blobdiff_plain/423726fc992211893ed74e63a3ccd907b7163280..refs/heads/arch_wiki_scrape:/lib/Prompts.hs diff --git a/lib/Prompts.hs b/lib/Prompts.hs index 689f203..50ef892 100644 --- a/lib/Prompts.hs +++ b/lib/Prompts.hs @@ -24,8 +24,8 @@ getInputMarkdown placeholder = do getProp :: T.Text -> T.Text -> IO String getProp prompt placeholder = do let string_prompt = T.unpack prompt - let string_placholder = T.unpack placeholder - x <- runInputT defaultSettings (getInputLineWithInitial string_prompt (string_placholder, "")) + let string_placeholder = T.unpack placeholder + x <- runInputT defaultSettings (getInputLineWithInitial string_prompt (string_placeholder, "")) case x of Just s -> return s Nothing -> return ""