diff options
| -rw-r--r-- | apps/Prompt.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/apps/Prompt.hs b/apps/Prompt.hs index e8280de..d256f63 100644 --- a/apps/Prompt.hs +++ b/apps/Prompt.hs @@ -30,7 +30,7 @@ promptYesNo msg = do where yeses = ["y", "yes"] noes = ["n", "no"] - + promptToContinue :: IO Bool promptToContinue = promptYesNo "Continue? (y/n) " |