This is an automated email from the git hooks/post-receive script.

infinity0 pushed a commit to branch pu/mk-origtargz-argmax
in repository devscripts.

commit 3fa9a36bb4f352c07a3537cb597aaf734ce936f1
Author: Ximin Luo <infini...@debian.org>
Date:   Sat Jan 13 17:22:02 2018 +0100

    Allow more files to be deleted than can fit inside argv (`getconf ARG_MAX`)
---
 scripts/mk-origtargz.pl | 12 +++++++-----
 1 file changed, 7 insertions(+), 5 deletions(-)

diff --git a/scripts/mk-origtargz.pl b/scripts/mk-origtargz.pl
index 4299b93..4533899 100644
--- a/scripts/mk-origtargz.pl
+++ b/scripts/mk-origtargz.pl
@@ -571,11 +571,13 @@ if ($do_repack || $deletecount) {
     # We have to use piping because --delete is broken otherwise, as documented
     # at https://www.gnu.org/software/tar/manual/html_node/delete.html
     if (@to_delete) {
-       spawn(exec => ['tar', '--delete', @to_delete ],
-             from_file => $destfiletar,
-             to_file => $destfiletar . ".tmp",
-             wait_child => 1) if scalar(@to_delete) > 0;
-       move ($destfiletar . ".tmp", $destfiletar);
+       while (my @next_n = splice @to_delete, 0, 16384) {
+           spawn(exec => ['tar', '--delete', @next_n ],
+                 from_file => $destfiletar,
+                 to_file => $destfiletar . ".tmp",
+                 wait_child => 1) if scalar(@next_n) > 0;
+           move ($destfiletar . ".tmp", $destfiletar);
+       }
     }
     compress_archive($destfiletar, $destfile, $compression);
 

-- 
Alioth's /usr/local/bin/git-commit-notice on 
/srv/git.debian.org/git/collab-maint/devscripts.git

_______________________________________________
devscripts-devel mailing list
devscripts-devel@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/devscripts-devel

Reply via email to