split Commits and lifted

2012-10-29 19:35:18 -04:00 · 2012-10-29 19:35:18 -04:00 · 42babf5012
commit 42babf5012
parent d2294f0dfa
7 changed files with 33 additions and 19 deletions
--- a/Assistant/Threads/Transferrer.hs
+++ b/Assistant/Threads/Transferrer.hs
@ -81,7 +81,7 @@ startTransfer program t info = case (transferRemote info, associatedFile info) o
 			liftIO $ void $ addAlert dstatus $
 				makeAlertFiller True $
 					transferFileAlert direction True file
-			recordCommit <<~ commitChan
+			recordCommit
 	  where
 		params =
 			[ Param "transferkey"