run transfer with copy of annex state

This should have made it run concurrently with other annex actions,
but I'm still seeing it serialize. Perhaps I need to forkProcess?
This commit is contained in:
Joey Hess 2012-07-05 16:07:49 -06:00
parent 2136ee4adb
commit 9eaba58dd9
2 changed files with 13 additions and 1 deletions

View file

@ -97,6 +97,6 @@ runTransfer st t info
inthread a = do
mvar <- newEmptyMVar
void $ forkIO $
runThreadState st a `E.finally` putMVar mvar ()
unsafeRunThreadState st a `E.finally` putMVar mvar ()
void $ takeMVar mvar -- wait for transfer thread
runThreadState st invalidateCache