diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-11-23 17:21:04 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-11-23 17:21:04 -0400 |
| commit | bd7b68de3d3b371fea3ff8dad1d4ec1dd9ce7e15 (patch) | |
| tree | f1a725a61b19b0e7ec7b65e2ed22fd52430ac82b /Assistant/Types | |
| parent | 2d7b692fb23b497110c179df15ad6b970171a652 (diff) | |
queue and start download of git-annex from web, using git-annex, when upgrade is started
Diffstat (limited to 'Assistant/Types')
| -rw-r--r-- | Assistant/Types/DaemonStatus.hs | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/Assistant/Types/DaemonStatus.hs b/Assistant/Types/DaemonStatus.hs index 1dd41c900..a618c700d 100644 --- a/Assistant/Types/DaemonStatus.hs +++ b/Assistant/Types/DaemonStatus.hs @@ -73,6 +73,8 @@ data DaemonStatus = DaemonStatus -- Broadcasts notifications when a global redirect is needed. , globalRedirNotifier :: NotificationBroadcaster , globalRedirUrl :: Maybe URLString + -- Actions to run after a Key is transferred. + , transferHook :: M.Map Key (Transfer -> IO ()) -- When the XMPP client is connected, this will contain the XMPP -- address. , xmppClientID :: Maybe ClientID @@ -112,5 +114,6 @@ newDaemonStatus = DaemonStatus <*> newNotificationBroadcaster <*> newNotificationBroadcaster <*> pure Nothing + <*> pure M.empty <*> pure Nothing <*> pure M.empty |