change to new waitForAllRunningCommandActions

waitForAllRunningCommandActions is a subset of finishCommandActions
and more appropriate for what is being done here: Just a concurrency
barrier.
This commit is contained in:
Joey Hess 2020-05-26 14:00:51 -04:00
parent 864ba4ecaa
commit 3824645368
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -647,7 +647,7 @@ seekSyncContent o rs currbranch = do
(return (gokey mvar bloom))
(const noop)
[]
finishCommandActions
waitForAllRunningCommandActions
liftIO $ not <$> isEmptyMVar mvar
where
seekworktree mvar l bloomfeeder =