diff options
author | Joey Hess <joey@kitenet.net> | 2013-04-24 16:13:22 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2013-04-24 16:13:22 -0400 |
commit | 5c49f7ef10b8d61cfabd8ca9602d852ae5abe452 (patch) | |
tree | 259f4088b02c3ed08d488572bfde314dec21b181 /Assistant/Monad.hs | |
parent | 6148b926959ce5cbbc12aafc60a119788ca6d97f (diff) |
use TList for ChangePool
Diffstat (limited to 'Assistant/Monad.hs')
-rw-r--r-- | Assistant/Monad.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Assistant/Monad.hs b/Assistant/Monad.hs index 5a0fc1570..b8a471566 100644 --- a/Assistant/Monad.hs +++ b/Assistant/Monad.hs @@ -66,7 +66,7 @@ data AssistantData = AssistantData , transferrerPool :: TransferrerPool , failedPushMap :: FailedPushMap , commitChan :: CommitChan - , changeChan :: ChangeChan + , changePool :: ChangePool , branchChangeHandle :: BranchChangeHandle , buddyList :: BuddyList , netMessager :: NetMessager @@ -83,7 +83,7 @@ newAssistantData st dstatus = AssistantData <*> newTransferrerPool <*> newFailedPushMap <*> newCommitChan - <*> newChangeChan + <*> newChangePool <*> newBranchChangeHandle <*> newBuddyList <*> newNetMessager |