diff options
author | 2012-07-06 16:44:13 -0600 | |
---|---|---|
committer | 2012-07-06 16:44:13 -0600 | |
commit | 62876502c55958cd8f716d6676eb97825456d9b7 (patch) | |
tree | 91bd4a801bb53cee557be73b175bfcc6220cc0e4 /Assistant/Threads/Watcher.hs | |
parent | 4a107951442f30354fa90b0b31200a9fdc86ffca (diff) |
wait on child transfer processes, and invalidate cache
There's still a bug; if the child updates its transfer info file,
then the data from it will superscede the TransferInfo, losing the
info that we should wait on this child.
Diffstat (limited to 'Assistant/Threads/Watcher.hs')
-rw-r--r-- | Assistant/Threads/Watcher.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Assistant/Threads/Watcher.hs b/Assistant/Threads/Watcher.hs index 882aab3a7..9f0eba74e 100644 --- a/Assistant/Threads/Watcher.hs +++ b/Assistant/Threads/Watcher.hs @@ -67,7 +67,7 @@ statupScan st dstatus scanner = do showAction "scanning" r <- scanner runThreadState st $ - modifyDaemonStatus dstatus $ \s -> s { scanComplete = True } + modifyDaemonStatus_ dstatus $ \s -> s { scanComplete = True } -- Notice any files that were deleted before watching was started. runThreadState st $ do |