diff options
| author | Joey Hess <joeyh@joeyh.name> | 2016-08-17 18:56:05 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-08-17 18:56:05 -0400 |
| commit | 14ca9ca78ff2ec55b5f353fe101562830a8dd9d7 (patch) | |
| tree | 303aa7b4308037fbcc8854474bdd5fd3463338cc /Types | |
| parent | c394b41a2ffb7e987864fa64fd583017c717703b (diff) | |
| download | keysafe-14ca9ca78ff2ec55b5f353fe101562830a8dd9d7.tar.gz | |
obscure name
Diffstat (limited to 'Types')
| -rw-r--r-- | Types/UI.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Types/UI.hs b/Types/UI.hs index 77a3095..553c323 100644 --- a/Types/UI.hs +++ b/Types/UI.hs @@ -14,7 +14,7 @@ data UI = UI , showError :: Desc -> IO () , showInfo :: Title -> Desc -> IO () , promptQuestion :: Title -> Desc -> Question -> IO Bool - , promptName :: Title -> Desc -> Name -> (Name -> Maybe Problem) -> IO (Maybe Name) + , promptName :: Title -> Desc -> Maybe Name -> (Name -> Maybe Problem) -> IO (Maybe Name) , promptPassword :: Bool -> Title -> Desc -> IO (Maybe Password) , promptKeyId :: Title -> Desc -> [(Name, KeyId)] -> IO (Maybe KeyId) , withProgress :: forall a. Title -> Desc -> ((Percent -> IO ()) -> IO a) -> IO a |