summaryrefslogtreecommitdiffstats
path: root/urpm/install.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tv@mageia.org>2013-02-05 14:31:02 +0000
committerThierry Vignaud <tv@mageia.org>2013-02-05 14:31:02 +0000
commitb00f4c5b263ca9e473b8bc4df06d5c44066cc0ad (patch)
tree1371a2b8b88718493bdb9d8c4d29241156f01e14 /urpm/install.pm
parent0496e8a533c4f7d2befd0360d40494d332acb361 (diff)
downloadurpmi-b00f4c5b263ca9e473b8bc4df06d5c44066cc0ad.tar
urpmi-b00f4c5b263ca9e473b8bc4df06d5c44066cc0ad.tar.gz
urpmi-b00f4c5b263ca9e473b8bc4df06d5c44066cc0ad.tar.bz2
urpmi-b00f4c5b263ca9e473b8bc4df06d5c44066cc0ad.tar.xz
urpmi-b00f4c5b263ca9e473b8bc4df06d5c44066cc0ad.zip
(_schedule_packages) localize a variable
Diffstat (limited to 'urpm/install.pm')
-rw-r--r--urpm/install.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/urpm/install.pm b/urpm/install.pm
index d867f172..2775cd30 100644
--- a/urpm/install.pm
+++ b/urpm/install.pm
@@ -205,7 +205,8 @@ sub _apply_delta_rpm {
}
sub _schedule_packages {
- my ($urpm, $trans, $install, $upgrade, $update, %options) = @_;
+ my ($urpm, $trans, $install, $upgrade, %options) = @_;
+ my $update = 0;
my (@trans_pkgs, @produced_deltas);
foreach my $mode ($install, $upgrade) {
foreach (keys %$mode) {
@@ -352,11 +353,11 @@ sub install {
$trans->set_script_fd($options{script_fd}) if $options{script_fd};
- my ($update, @errors) = 0;
+ my @errors;
_schedule_packages_for_erasing($urpm, $trans, $remove);
- my ($produced_deltas, @trans_pkgs) = _schedule_packages($urpm, $trans, $install, $upgrade, $update, %options);
+ my ($produced_deltas, @trans_pkgs) = _schedule_packages($urpm, $trans, $install, $upgrade, %options);
if (!$options{nodeps} && (@errors = $trans->check(%options))) {
} elsif (!$options{noorder} && (@errors = $trans->order)) {