summaryrefslogtreecommitdiff
path: root/Assistant/Monad.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Assistant/Monad.hs')
-rw-r--r--Assistant/Monad.hs4
1 files changed, 4 insertions, 0 deletions
diff --git a/Assistant/Monad.hs b/Assistant/Monad.hs
index e52983915..403ee16a8 100644
--- a/Assistant/Monad.hs
+++ b/Assistant/Monad.hs
@@ -62,7 +62,9 @@ data AssistantData = AssistantData
, transferSlots :: TransferSlots
, transferrerPool :: TransferrerPool
, failedPushMap :: FailedPushMap
+ , failedExportMap :: FailedPushMap
, commitChan :: CommitChan
+ , exportCommitChan :: CommitChan
, changePool :: ChangePool
, repoProblemChan :: RepoProblemChan
, branchChangeHandle :: BranchChangeHandle
@@ -80,6 +82,8 @@ newAssistantData st dstatus = AssistantData
<*> newTransferSlots
<*> newTransferrerPool (checkNetworkConnections dstatus)
<*> newFailedPushMap
+ <*> newFailedPushMap
+ <*> newCommitChan
<*> newCommitChan
<*> newChangePool
<*> newRepoProblemChan