mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

use TList for ChangePool

Browse source
This commit is contained in:
Joey Hess 2013-04-24 16:13:22 -04:00
parent 25aabf4ffe
commit 76431520e4
3 changed files with 31 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

4
Assistant/Monad.hs
View file

@ -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