webapp: Display an alert when there are XMPP remotes, and a cloud transfer repository needs to be configured.

This commit is contained in:
Joey Hess 2013-03-15 17:52:41 -04:00
parent 39e979fb65
commit 77c82de4ea
13 changed files with 146 additions and 27 deletions

View file

@ -46,6 +46,8 @@ data DaemonStatus = DaemonStatus
, syncGitRemotes :: [Remote]
-- Ordered list of remotes to sync data with
, syncDataRemotes :: [Remote]
-- Are we syncing to any cloud remotes?
, syncingToCloudRemote :: Bool
-- List of uuids of remotes that we may have gotten out of sync with.
, desynced :: S.Set UUID
-- Pairing request that is in progress.
@ -81,6 +83,7 @@ newDaemonStatus = DaemonStatus
<*> pure []
<*> pure []
<*> pure []
<*> pure False
<*> pure S.empty
<*> pure Nothing
<*> newNotificationBroadcaster