diff options
Diffstat (limited to 'Types/UI.hs')
| -rw-r--r-- | Types/UI.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/Types/UI.hs b/Types/UI.hs index 7508293..77a3095 100644 --- a/Types/UI.hs +++ b/Types/UI.hs @@ -12,6 +12,7 @@ import Types data UI = UI { isAvailable :: IO Bool , showError :: Desc -> IO () + , showInfo :: Title -> Desc -> IO () , promptQuestion :: Title -> Desc -> Question -> IO Bool , promptName :: Title -> Desc -> Name -> (Name -> Maybe Problem) -> IO (Maybe Name) , promptPassword :: Bool -> Title -> Desc -> IO (Maybe Password) |