From 717e62793ef21d5e42950746106df4ab1296968b Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Wed, 9 Jul 2008 21:28:05 +0000 Subject: cleanup --- urpm/parallel_ka_run.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/urpm/parallel_ka_run.pm b/urpm/parallel_ka_run.pm index 86c67659..f3cb0dda 100644 --- a/urpm/parallel_ka_run.pm +++ b/urpm/parallel_ka_run.pm @@ -141,7 +141,7 @@ sub parallel_resolve_dependencies { } #- execute urpmq to determine packages to install. - my ($node, $cont, %chosen); + my ($cont, %chosen); local $_; do { $cont = 0; #- prepare to stop iteration. @@ -151,7 +151,7 @@ sub parallel_resolve_dependencies { open my $fh, rshp_command($urpm, $parallel, "-v", "urpmq --synthesis $synthesis -fduc $line " . join(' ', keys %chosen)) . " |"; while (<$fh>) { chomp; - ($node, $_) = _parse_rshp_output($_) or next; + (my $node, $_) = _parse_rshp_output($_) or next; if (my ($action, $what) = /^\@([^\@]*)\@(.*)/) { if ($action eq 'removing') { $state->{rejected}{$what}{removed} = 1; -- cgit v1.2.1