diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-08-17 15:03:33 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-08-17 15:03:33 -0400 |
commit | 78c71badb458f3709f4689641dbb9efd53d962cf (patch) | |
tree | c00689a389ad0598f136566c0acbf0efabf8da76 /Types | |
parent | f60ac335e4e827fd242ab22539adb49f26e2c319 (diff) | |
download | keysafe-78c71badb458f3709f4689641dbb9efd53d962cf.tar.gz |
progress display for storing
Diffstat (limited to 'Types')
-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) |