diff options
| -rw-r--r-- | Assistant/TransferrerPool.hs | 5 | ||||
| -rw-r--r-- | debian/changelog | 1 |
2 files changed, 5 insertions, 1 deletions
diff --git a/Assistant/TransferrerPool.hs b/Assistant/TransferrerPool.hs index bb4648731..79b609a1d 100644 --- a/Assistant/TransferrerPool.hs +++ b/Assistant/TransferrerPool.hs @@ -12,6 +12,7 @@ module Assistant.TransferrerPool where import Assistant.Common import Assistant.Types.TransferrerPool import Logs.Transfer +import Utility.Batch #ifndef mingw32_HOST_OS import qualified Command.TransferKeys as T @@ -63,9 +64,11 @@ mkTransferrer program = do , Param "--readfd", Param $ show tread , Param "--writefd", Param $ show twrite ] + {- It runs as a batch job. -} + (program', params') <- toBatchCommand (program, params) {- It's put into its own group so that the whole group can be - killed to stop a transfer. -} - (_, _, _, pid) <- createProcess (proc program $ toCommand params) + (_, _, _, pid) <- createProcess (proc program' $ toCommand params') { create_group = True } closeFd twrite closeFd tread diff --git a/debian/changelog b/debian/changelog index 567ea8bbf..a9fcc1857 100644 --- a/debian/changelog +++ b/debian/changelog @@ -4,6 +4,7 @@ git-annex (5.20131131) UNRELEASED; urgency=low it will read the full contents of files in the tree. * assistant: Batch jobs are now run with ionice and nocache, when those commands are available. + * assistant: Run transferkeys as batch jobs. -- Joey Hess <joeyh@debian.org> Sun, 01 Dec 2013 13:57:58 -0400 |