avoid sending uploads right back to where the download came from

Just an optimisation.
This commit is contained in:
Joey Hess 2012-09-18 14:24:51 -04:00
parent 3a0cffcfed
commit 9f05d19108
2 changed files with 13 additions and 4 deletions

View file

@ -86,7 +86,9 @@ onDel st dstatus transferqueue file _ = case parseTransferFile file of
- spreading them out to other reachable remotes. -}
case (minfo, transferDirection t) of
(Just info, Download) -> runThreadState st $
queueTransfers Later transferqueue dstatus
queueTransfersMatching
(/= transferUUID t)
Later transferqueue dstatus
(transferKey t)
(associatedFile info)
Upload