move remoteList into dupState
This does mean that RemoteDaemon.Transport.Tor's call runs it, otherwise no change, but this is groundwork for doing more such expensive actions in dupState.
This commit is contained in:
parent
988317634b
commit
fe9cf1256e
7 changed files with 148 additions and 20 deletions
|
@ -23,7 +23,10 @@ import Utility.Exception
|
|||
import Annex.Common
|
||||
import qualified Annex
|
||||
import Annex.Content
|
||||
import Annex.Concurrent
|
||||
import Annex.CatFile
|
||||
import Annex.CheckAttr
|
||||
import Annex.HashObject
|
||||
import Annex.CheckIgnore
|
||||
|
||||
{- Actions to perform each time ran. -}
|
||||
startup :: Annex ()
|
||||
|
@ -37,6 +40,14 @@ shutdown nocommit = do
|
|||
stopCoProcesses
|
||||
liftIO reapZombies -- zombies from long-running git processes
|
||||
|
||||
{- Stops all long-running git query processes. -}
|
||||
stopCoProcesses :: Annex ()
|
||||
stopCoProcesses = do
|
||||
catFileStop
|
||||
checkAttrStop
|
||||
hashObjectStop
|
||||
checkIgnoreStop
|
||||
|
||||
{- Reaps any zombie processes that may be hanging around.
|
||||
-
|
||||
- Warning: Not thread safe. Anything that was expecting to wait
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue