From 3034ae97c467f38171a8e0370a98fa2f4e2cc3e3 Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Tue, 21 Nov 2006 14:59:23 +0000 Subject: drop urpm::parallel_install(), directly use {parallel_handler}->parallel_install --- urpm.pm | 7 ------- urpmi | 8 +++++--- 2 files changed, 5 insertions(+), 10 deletions(-) diff --git a/urpm.pm b/urpm.pm index 42200a8c..53692b48 100644 --- a/urpm.pm +++ b/urpm.pm @@ -2918,13 +2918,6 @@ sub install { @l; } -#- install all files to node as remembered according to resolving done. -sub parallel_install { - my @para = @_; - my ($urpm, $_remove, $_install, $_upgrade, %_options) = @para; - $urpm->{parallel_handler}->parallel_install(@para); -} - #- find packages to remove. #- options: #- bundle diff --git a/urpmi b/urpmi index 4d56fcda..4baeaee3 100755 --- a/urpmi +++ b/urpmi @@ -693,9 +693,11 @@ foreach my $set (@{$state->{transaction} || []}) { print N("distributing %s", join(' ', values %transaction_sources_install, values %transaction_sources)), "\n"; #- no remove are handle here, automatically done by each distant node. $urpm->{log}("starting distributed install"); - $urpm->parallel_install([ keys %{$state->{rejected} || {}} ], \%transaction_sources_install, \%transaction_sources, - test => $test, - excludepath => $urpm->{options}{excludepath}, excludedocs => $urpm->{options}{excludedocs}); + $urpm->{parallel_handler}->parallel_install( + [ keys %{$state->{rejected} || {}} ], \%transaction_sources_install, \%transaction_sources, + test => $test, + excludepath => $urpm->{options}{excludepath}, excludedocs => $urpm->{options}{excludedocs}, + ); } else { my @packnames = (values %transaction_sources_install, values %transaction_sources); (my $common_prefix) = $packnames[0] =~ m!^(.*)/!; -- cgit v1.2.1