summaryrefslogtreecommitdiffstats
path: root/urpm/install.pm
diff options
context:
space:
mode:
Diffstat (limited to 'urpm/install.pm')
-rw-r--r--urpm/install.pm12
1 files changed, 6 insertions, 6 deletions
diff --git a/urpm/install.pm b/urpm/install.pm
index bd45298e..ec21c9b8 100644
--- a/urpm/install.pm
+++ b/urpm/install.pm
@@ -157,7 +157,7 @@ sub install {
return N("unable to create transaction");
}
- my ($update, @l) = 0;
+ my ($update, @errors) = 0;
my @produced_deltas;
foreach (@$remove) {
@@ -200,8 +200,8 @@ sub install {
}
++$update;
}
- if (!$options{nodeps} && (@l = $trans->check(%options))) {
- } elsif (!$options{noorder} && (@l = $trans->order)) {
+ if (!$options{nodeps} && (@errors = $trans->check(%options))) {
+ } elsif (!$options{noorder} && (@errors = $trans->order)) {
} else {
$urpm->{readmes} = {};
my $index;
@@ -242,10 +242,10 @@ sub install {
$options{callback_inst} ||= \&install_logger;
$options{callback_trans} ||= \&install_logger;
}
- @l = $trans->run($urpm, %options);
+ @errors = $trans->run($urpm, %options);
#- don't clear cache if transaction failed. We might want to retry.
- if (@l == 0 && !$options{test} && $options{post_clean_cache}) {
+ if (@errors == 0 && !$options{test} && $options{post_clean_cache}) {
#- examine the local cache to delete packages which were part of this transaction
my $cachedir = "$urpm->{cachedir}/rpms";
my @pkgs = grep { -e "$cachedir/$_" } map { $_->filename } @trans_pkgs;
@@ -270,7 +270,7 @@ sub install {
urpm::sys::clean_rpmdb_shared_regions($urpm->{root});
}
- @l;
+ @errors;
}
1;