diff options
| author |  Joey Hess <joeyh@joeyh.name> | 2015-07-09 15:23:14 -0400 |
|---|---|---|
| committer | Joey Hess <joeyh@joeyh.name> | 2015-07-09 15:23:14 -0400 |
| commit | 87896574f32be5aa1636facc494faeab34cd0845 (patch) | |
| tree | e3fe7c3572007aaa29eddd1f6ea2aebc07e40c3c /Command/TransferInfo.hs | |
| parent | 80603339ea4e8b93ef456e706ca8c4efeef341f8 (diff) | |
converted copy and move
Got a little tricky..
Diffstat (limited to 'Command/TransferInfo.hs')
| -rw-r--r-- | Command/TransferInfo.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/Command/TransferInfo.hs b/Command/TransferInfo.hs index d102be55e..2b5713d77 100644 --- a/Command/TransferInfo.hs +++ b/Command/TransferInfo.hs @@ -49,8 +49,8 @@ start (k:[]) = do , transferUUID = u , transferKey = key } - info <- liftIO $ startTransferInfo file - (update, tfile, _) <- mkProgressUpdater t info + tinfo <- liftIO $ startTransferInfo file + (update, tfile, _) <- mkProgressUpdater t tinfo liftIO $ mapM_ void [ tryIO $ forever $ do bytes <- readUpdate |