diff options
| -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 |