summaryrefslogtreecommitdiffstats
path: root/urpm/parallel_ka_run.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2008-07-09 21:28:05 +0000
committerPascal Rigaux <pixel@mandriva.com>2008-07-09 21:28:05 +0000
commit717e62793ef21d5e42950746106df4ab1296968b (patch)
treeeec767280bbda30f6b4237049e93da84f3e92317 /urpm/parallel_ka_run.pm
parentecda091000e144e4e4e6b5c56c37622f0f2fec0d (diff)
downloadurpmi-717e62793ef21d5e42950746106df4ab1296968b.tar
urpmi-717e62793ef21d5e42950746106df4ab1296968b.tar.gz
urpmi-717e62793ef21d5e42950746106df4ab1296968b.tar.bz2
urpmi-717e62793ef21d5e42950746106df4ab1296968b.tar.xz
urpmi-717e62793ef21d5e42950746106df4ab1296968b.zip
cleanup
Diffstat (limited to 'urpm/parallel_ka_run.pm')
-rw-r--r--urpm/parallel_ka_run.pm4
1 files 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;