diff options
author | Joey Hess <joeyh@joeyh.name> | 2016-08-18 15:32:31 -0400 |
---|---|---|
committer | Joey Hess <joeyh@joeyh.name> | 2016-08-18 15:32:31 -0400 |
commit | 338e98c8efcbdabbe00e1f9e64f409aa64f3581a (patch) | |
tree | fb8bceadc363de16443c5d4dbda87995e734fa15 /Storage/Network.hs | |
parent | 37f7700c75adff98685cf54966b58d97dac8afcf (diff) | |
download | keysafe-338e98c8efcbdabbe00e1f9e64f409aa64f3581a.tar.gz |
add support for multiple storage locattions
also, server upload queues in ~/.keysafe
Diffstat (limited to 'Storage/Network.hs')
-rw-r--r-- | Storage/Network.hs | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/Storage/Network.hs b/Storage/Network.hs index 06b7545..7a461c7 100644 --- a/Storage/Network.hs +++ b/Storage/Network.hs @@ -5,10 +5,13 @@ {-# LANGUAGE OverloadedStrings #-} -module Storage.Network (networkStorage) where +module Storage.Network (networkServers, networkStorage) where import Types -import Storage +import Types.Storage + +networkServers :: IO StorageLocations +networkServers = return $ StorageLocations [] -- none yet networkStorage :: Storage networkStorage = Storage |