From 2e5d71fb66a530534c07ffe138a525280940e050 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Wed, 9 Jul 2008 18:32:35 +0000
Subject: cleanup

---
 urpm/parallel_ka_run.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/urpm/parallel_ka_run.pm b/urpm/parallel_ka_run.pm
index 3a0c79f5..e21d52b3 100644
--- a/urpm/parallel_ka_run.pm
+++ b/urpm/parallel_ka_run.pm
@@ -39,7 +39,6 @@ sub parallel_register_rpms {
 sub parallel_find_remove {
     my ($parallel, $urpm, $state, $l, %options) = @_;
     my ($test, $node, %bad_nodes, %base_to_remove, %notfound);
-    local $_;
 
     #- keep in mind if the previous selection is still active, it avoid
     #- to re-start urpme --test on each node.
@@ -57,6 +56,7 @@ sub parallel_find_remove {
     #- now try an iteration of urpmq.
     $urpm->{log}("parallel_ka_run: $rshp_command -v $parallel->{options} -- urpme --no-locales --auto $test" . (join ' ', map { "'$_'" } @$l));
     open my $fh, "$rshp_command -v $parallel->{options} -- urpme --no-locales --auto $test" . join(' ', map { "'$_'" } @$l) . " 2>&1 |";
+    local $_;
     while (<$fh>) {
 	chomp;
 	($node, $_) = _parse_rshp_output($_) or next;
-- 
cgit v1.2.1