From: Ján Tomko Date: Mon, 30 May 2016 17:04:32 +0000 (+0200) Subject: test-wrap-argv: return a string in rewrap_line X-Git-Tag: v2.0.0-rc1~132 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=80880fd4af75b0e47c80e65438444e6ff1959149;p=thirdparty%2Flibvirt.git test-wrap-argv: return a string in rewrap_line Leave the printing up to &rewrap. --- diff --git a/tests/test-wrap-argv.pl b/tests/test-wrap-argv.pl index 4e942cd90f..1f619cc7b0 100755 --- a/tests/test-wrap-argv.pl +++ b/tests/test-wrap-argv.pl @@ -59,7 +59,7 @@ sub rewrap { # Now each @lines represents a single command, we # can process them foreach my $line (@lines) { - &rewrap_line ($line); + print &rewrap_line ($line); } } @@ -103,7 +103,7 @@ sub rewrap_line { # We might have to split line argument values... @args = map { &rewrap_arg($_) } @args; # Print env + command first - print join(" \\\n", @env, $cmd, @args), "\n"; + return join(" \\\n", @env, $cmd, @args), "\n"; } sub rewrap_arg {