From 64a50218fbc2b411d8bf2b25dcf61bf05129c871 Mon Sep 17 00:00:00 2001 From: Guillaume Rousse Date: Fri, 8 May 2009 23:12:23 +0000 Subject: oopd --- compress_files | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) (limited to 'compress_files') diff --git a/compress_files b/compress_files index a3fb215..ef56a43 100755 --- a/compress_files +++ b/compress_files @@ -158,13 +158,13 @@ sub xargs { if (length($arg) + 1 + $static_length > $command_max) { error(qq(This command is greater than the maximum command size allowed by the kernel, and cannot be split up further. What on earth are you doing? "@_ $_")); } - $length += length($_) + 1; + $length += length($arg) + 1; if ($length < $command_max) { - push @collect, $_; + push @collect, $arg; } else { system(@_, @collect) if $#collect > -1; - @collect = $_; - $length = $static_length + length($_) + 1; + @collect = $arg; + $length = $static_length + length($arg) + 1; } } system(@_, @collect) if $#collect > -1; -- cgit v1.2.1