remove debug
This commit is contained in:
parent
1eb3fff787
commit
2c365b8b74
1 changed files with 1 additions and 2 deletions
|
@ -51,7 +51,6 @@ transferPollerThread = namedThread "TransferPoller" $ do
|
||||||
maybe noop (newsize t info . bytesComplete) mi
|
maybe noop (newsize t info . bytesComplete) mi
|
||||||
|
|
||||||
newsize t info sz
|
newsize t info sz
|
||||||
| bytesComplete info /= sz && isJust sz = do
|
| bytesComplete info /= sz && isJust sz =
|
||||||
liftIO $ print ("alterTransferInfo called", sz)
|
|
||||||
alterTransferInfo t $ \i -> i { bytesComplete = sz }
|
alterTransferInfo t $ \i -> i { bytesComplete = sz }
|
||||||
| otherwise = noop
|
| otherwise = noop
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue