summaryrefslogtreecommitdiffhomepage
path: root/Storage.hs
diff options
context:
space:
mode:
authorJoey Hess <joeyh@joeyh.name>2017-04-04 12:48:13 -0400
committerJoey Hess <joeyh@joeyh.name>2017-04-04 12:48:13 -0400
commit1a1d0e95b8da5e67fb76589eecf72aa7592d7dd7 (patch)
treea3bb9f3f207c63f8709304125a5f5617bb964a8c /Storage.hs
parent0d52ac5404f4203f5ea8dc13b5dcc30d67eaf444 (diff)
downloadkeysafe-1a1d0e95b8da5e67fb76589eecf72aa7592d7dd7.tar.gz
move TODO to doc/todo, expand a few items
Diffstat (limited to 'Storage.hs')
-rw-r--r--Storage.hs3
1 files changed, 0 insertions, 3 deletions
diff --git a/Storage.hs b/Storage.hs
index feb5791..88e6ae5 100644
--- a/Storage.hs
+++ b/Storage.hs
@@ -73,9 +73,6 @@ problemStoringIn (StorageLocations locs) tunables
--
-- If a server is not currently accessible, it will be queued locally.
-- If any uploads are queued, returns True.
---
--- TODO: Add shuffling and queueing/chaffing to prevent
--- correlation of related shares.
storeShares :: StorageLocations -> ShareIdents -> [S.Set Share] -> UpdateProgress -> IO (StoreResult, Bool, [Storage])
storeShares (StorageLocations locs) allsis shares updateprogress = do
((r, anyqueued), usedlocs) <- go allsis shares [] False