aboutsummaryrefslogtreecommitdiff
path: root/Assistant/Types
diff options
context:
space:
mode:
authorGravatar Joey Hess <joeyh@joeyh.name>2017-09-20 13:27:59 -0400
committerGravatar Joey Hess <joeyh@joeyh.name>2017-09-20 13:58:27 -0400
commitd20933a25956a3a07247f66fe3a554761d616173 (patch)
tree47bd006b6255beac3b7286977988c64dce6236a2 /Assistant/Types
parent7fa114e629fe33822763f376ac57b0efd48d5686 (diff)
first pass at assistant knowing about export remotes
Split exportRemotes out from syncDataRemotes; the parts of the assistant that upload keys and drop keys from remotes don't apply to exports, because those operations are not supported. Some parts of the assistant and webapp do operate on both syncDataRemotes and exportRemotes. Particularly when downloading from either of them. Added a downloadRemotes that combines both. With this, the assistant should download from exports, but it won't yet upload changes to them. This commit was sponsored by Fernando Jimenez on Patreon.
Diffstat (limited to 'Assistant/Types')
-rw-r--r--Assistant/Types/DaemonStatus.hs6
1 files changed, 6 insertions, 0 deletions
diff --git a/Assistant/Types/DaemonStatus.hs b/Assistant/Types/DaemonStatus.hs
index 08e98d98e..1166cd18a 100644
--- a/Assistant/Types/DaemonStatus.hs
+++ b/Assistant/Types/DaemonStatus.hs
@@ -49,6 +49,10 @@ data DaemonStatus = DaemonStatus
, syncGitRemotes :: [Remote]
-- Ordered list of remotes to sync data with
, syncDataRemotes :: [Remote]
+ -- Ordered list of remotes to export to
+ , exportRemotes :: [Remote]
+ -- Ordered list of remotes that data can be downloaded from
+ , downloadRemotes :: [Remote]
-- Are we syncing to any cloud remotes?
, syncingToCloudRemote :: Bool
-- Set of uuids of remotes that are currently connected.
@@ -97,6 +101,8 @@ newDaemonStatus = DaemonStatus
<*> pure []
<*> pure []
<*> pure []
+ <*> pure []
+ <*> pure []
<*> pure False
<*> pure S.empty
<*> pure Nothing