diff options
| author |  Joey Hess <joey@kitenet.net> | 2014-01-23 16:51:16 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2014-01-23 16:51:16 -0400 |
| commit | 8d1787a73ddfb189005d80998503fae06b49c0f1 (patch) | |
| tree | 15218a6dc0d15f4acca9e489301a055fe6c9ed8b /Assistant/TransferSlots.hs | |
| parent | 5112650348f6bf04cebe1fb97ed900b24e4aaac1 (diff) | |
try to drop unused object if it does not need to be transferred anywhere
Diffstat (limited to 'Assistant/TransferSlots.hs')
| -rw-r--r-- | Assistant/TransferSlots.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/TransferSlots.hs b/Assistant/TransferSlots.hs index 6fc8c3fd7..de96cdf85 100644 --- a/Assistant/TransferSlots.hs +++ b/Assistant/TransferSlots.hs @@ -218,7 +218,7 @@ finishedTransfer t (Just info) | transferDirection t == Download = whenM (liftAnnex $ inAnnex $ transferKey t) $ do dodrops False - queueTransfersMatching (/= transferUUID t) + void $ queueTransfersMatching (/= transferUUID t) "newly received object" Later (transferKey t) (associatedFile info) Upload | otherwise = dodrops True |