diff options
| author | Joey Hess <joeyh@joeyh.name> | 2016-08-12 05:00:17 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2016-08-12 05:00:17 -0400 |
| commit | 0045c4b162d2a68a85b8e7844dca97834f888dd5 (patch) | |
| tree | 12cff1c993008797edf261aa18d529bc1fb32954 /Storage.hs | |
| parent | f74151ead49895f86257c9abfbe90c027d91d456 (diff) | |
| download | keysafe-0045c4b162d2a68a85b8e7844dca97834f888dd5.tar.gz | |
separate error code for already exsisting object store
Diffstat (limited to 'Storage.hs')
| -rw-r--r-- | Storage.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -16,7 +16,7 @@ data Storage = Storage , countShards :: IO CountResult } -- Note that there is no interface to enumerate shards. -data StoreResult = StoreSuccess | StoreFailure String +data StoreResult = StoreSuccess | StoreAlreadyExists | StoreFailure String deriving (Show) data RetrieveResult = RetrieveSuccess Shard | RetrieveFailure String |