From 6d67fd7b5f62960b3a565e4f4c287f31aba4da62 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 7 Nov 2006 08:57:16 +0000 Subject: move the "\n" in the print, it's nicer (but no real speedup) --- urpmf | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'urpmf') diff --git a/urpmf b/urpmf index 25dbeae1..6ab2cced 100755 --- a/urpmf +++ b/urpmf @@ -146,10 +146,10 @@ my $sprintfargs = join(', ', map { my $next_st = $multi ? 'next' : 'return 1'; my @inner = ( - "my \$s = sprintf(qq{$proto\\n}, $sprintfargs);", + "my \$s = sprintf(qq{$proto}, $sprintfargs);", "\$s =~ $expr or $next_st;", $uniq ? ('$uniq{$s} and ' . $next_st . ';', '$uniq{$s} = 1;') : (), - 'print $s;', + 'print $s, "\n";', ); if ($multi) { -- cgit v1.2.1