From 2db78797ee58e53f06bd2d104fb203c45247e7c0 Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Tue, 29 Oct 2013 13:41:44 -0400 Subject: move code around and rename thread; no functional changes --- Assistant/Monad.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'Assistant/Monad.hs') diff --git a/Assistant/Monad.hs b/Assistant/Monad.hs index 154813785..6b843ea88 100644 --- a/Assistant/Monad.hs +++ b/Assistant/Monad.hs @@ -39,7 +39,7 @@ import Assistant.Types.Pushes import Assistant.Types.BranchChange import Assistant.Types.Commits import Assistant.Types.Changes -import Assistant.Types.RemoteProblem +import Assistant.Types.RepoProblem import Assistant.Types.Buddies import Assistant.Types.NetMessager import Assistant.Types.ThreadName @@ -64,7 +64,7 @@ data AssistantData = AssistantData , failedPushMap :: FailedPushMap , commitChan :: CommitChan , changePool :: ChangePool - , remoteProblemChan :: RemoteProblemChan + , repoProblemChan :: RepoProblemChan , branchChangeHandle :: BranchChangeHandle , buddyList :: BuddyList , netMessager :: NetMessager @@ -82,7 +82,7 @@ newAssistantData st dstatus = AssistantData <*> newFailedPushMap <*> newCommitChan <*> newChangePool - <*> newRemoteProblemChan + <*> newRepoProblemChan <*> newBranchChangeHandle <*> newBuddyList <*> newNetMessager -- cgit v1.2.3