summaryrefslogtreecommitdiff
path: root/Assistant/TransferSlots.hs
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2012-08-29 14:06:45 -0400
committerGravatar Joey Hess <joey@kitenet.net>2012-08-29 14:06:45 -0400
commitc59ba80b5b49fb79f71dddde97e2f92959161f9b (patch)
treebe8eaa0383ff6ef053f2b6fbe253658e671cf4c2 /Assistant/TransferSlots.hs
parentd2a4ffe669b6aeec0b660b08099aa56d3208daa7 (diff)
remove debug prints
Diffstat (limited to 'Assistant/TransferSlots.hs')
-rw-r--r--Assistant/TransferSlots.hs8
1 files changed, 2 insertions, 6 deletions
diff --git a/Assistant/TransferSlots.hs b/Assistant/TransferSlots.hs
index 8e24d730c..3dd29a823 100644
--- a/Assistant/TransferSlots.hs
+++ b/Assistant/TransferSlots.hs
@@ -75,9 +75,5 @@ runTransferThread dstatus s (Just (t, info, a)) = do
go = catchPauseResume a
pause = catchPauseResume $ runEvery (Seconds 86400) noop
catchPauseResume a' = E.catch a' handlePauseResume
- handlePauseResume PauseTransfer = do
- putStrLn "pause"
- pause
- handlePauseResume ResumeTransfer = do
- putStrLn "resume"
- go
+ handlePauseResume PauseTransfer = pause
+ handlePauseResume ResumeTransfer = go