mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

bugfix

Browse source
This commit is contained in:
Joey Hess 2012-07-07 11:17:20 -06:00
parent 8939ef3121
commit c8691d76aa
1 changed files with 3 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
Assistant/Threads/TransferWatcher.hs
View file

@ -57,7 +57,9 @@ onAdd st dstatus _ file _ = case parseTransferFile file of
where where
go _ Nothing = noop -- transfer already finished go _ Nothing = noop -- transfer already finished
go t (Just info) = adjustTransfers dstatus $ go t (Just info) = adjustTransfers dstatus $
M.insertWith' const t info M.insertWith' merge t info
-- preseve shouldWait flag, which is not written to disk
merge new old = new { shouldWait = shouldWait old }
{- Called when a transfer information file is removed. {- Called when a transfer information file is removed.
- -