diff options
Diffstat (limited to 'Assistant/Monad.hs')
-rw-r--r-- | Assistant/Monad.hs | 4 |
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 |