diff options
author | Thierry Vignaud <tv@mageia.org> | 2012-08-31 16:45:01 +0000 |
---|---|---|
committer | Thierry Vignaud <tv@mageia.org> | 2012-08-31 16:45:01 +0000 |
commit | dc56ab1ec5dc52417004ebf606dd4e8360c2c3cf (patch) | |
tree | d1b7376963ddc18b6d5db7a0e93c096e155efe4d | |
parent | 1996fe6cc924162a321a4a2cc688df611b105253 (diff) | |
download | urpmi-dc56ab1ec5dc52417004ebf606dd4e8360c2c3cf.tar urpmi-dc56ab1ec5dc52417004ebf606dd4e8360c2c3cf.tar.gz urpmi-dc56ab1ec5dc52417004ebf606dd4e8360c2c3cf.tar.bz2 urpmi-dc56ab1ec5dc52417004ebf606dd4e8360c2c3cf.tar.xz urpmi-dc56ab1ec5dc52417004ebf606dd4e8360c2c3cf.zip |
(extract_packages_to_install) drop unused parameter
-rw-r--r-- | urpm.pm | 2 | ||||
-rw-r--r-- | urpm/main_loop.pm | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -394,7 +394,7 @@ sub is_delta_installable { #- - for inst.list (cf flag disable_obsolete) #- sources is a hash of id -> source rpm filename. sub extract_packages_to_install { - my ($urpm, $sources, $_state) = @_; + my ($urpm, $sources) = @_; my %inst; foreach (keys %$sources) { diff --git a/urpm/main_loop.pm b/urpm/main_loop.pm index cbffd911..08ac11ca 100644 --- a/urpm/main_loop.pm +++ b/urpm/main_loop.pm @@ -367,7 +367,7 @@ sub run { $callbacks->{post_download} and $callbacks->{post_download}->(); #- extract packages that should be installed instead of upgraded, - my %transaction_sources_install = %{$urpm->extract_packages_to_install($transaction_sources, $state) || {}}; + my %transaction_sources_install = %{$urpm->extract_packages_to_install($transaction_sources) || {}}; $callbacks->{post_extract} and $callbacks->{post_extract}->($set, $transaction_sources, \%transaction_sources_install); #- verify packages |