summaryrefslogtreecommitdiff
path: root/Assistant/Types
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-10-13 17:14:56 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-10-13 17:14:56 -0400
commit7e226e373b203dce324b9d3b7fc2a82ca1781183 (patch)
tree50cf3d083441c4a99d4e46f95a66421e1e1d2a4a /Assistant/Types
parenta0865e6c494ec4bdfb7ab058a5633a8634d48bd4 (diff)
cronner: run jobs triggered by remotes becoming connected (untested)
Diffstat (limited to 'Assistant/Types')
-rw-r--r--Assistant/Types/DaemonStatus.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Assistant/Types/DaemonStatus.hs b/Assistant/Types/DaemonStatus.hs
index afb5f940a..abb857a36 100644
--- a/Assistant/Types/DaemonStatus.hs
+++ b/Assistant/Types/DaemonStatus.hs
@@ -18,6 +18,7 @@ import Assistant.Types.NetMessager
import Assistant.Types.Alert
import Control.Concurrent.STM
+import Control.Concurrent.MVar
import Control.Concurrent.Async
import Data.Time.Clock.POSIX
import qualified Data.Map as M
@@ -69,6 +70,8 @@ data DaemonStatus = DaemonStatus
-- When the XMPP client is connected, this will contain the XMPP
-- address.
, xmppClientID :: Maybe ClientID
+ -- MVars to signal when a remote gets connected.
+ , connectRemoteNotifiers :: M.Map UUID [MVar ()]
}
type TransferMap = M.Map Transfer TransferInfo
@@ -100,3 +103,4 @@ newDaemonStatus = DaemonStatus
<*> newNotificationBroadcaster
<*> newNotificationBroadcaster
<*> pure Nothing
+ <*> pure M.empty