more state

This commit is contained in:
Joey Hess 2010-10-12 16:10:15 -04:00
parent 2ac47a3a59
commit 20acda0423
5 changed files with 12 additions and 14 deletions

View file

@ -26,9 +26,9 @@ data Backend = Backend {
-- stores a file's contents to a key
storeFileKey :: State -> FilePath -> Key -> IO Bool,
-- retrieves a key's contents to a file
retrieveKeyFile :: Key -> FilePath -> IO Bool,
retrieveKeyFile :: State -> Key -> FilePath -> IO Bool,
-- removes a key
removeKey :: Key -> IO Bool
removeKey :: State -> Key -> IO Bool
}
instance Show Backend where