summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrancois Pons <fpons@mandriva.com>2002-01-04 17:16:01 +0000
committerFrancois Pons <fpons@mandriva.com>2002-01-04 17:16:01 +0000
commit6ea016b32d565af4c2be937295792089aeb56d9d (patch)
tree4558f62ef2319e69ce939a04206d84ad3c2e6d49 /perl-install
parentaa560937696c59232dfdf00f3b493b8f85bf412a (diff)
downloaddrakx-6ea016b32d565af4c2be937295792089aeb56d9d.tar
drakx-6ea016b32d565af4c2be937295792089aeb56d9d.tar.gz
drakx-6ea016b32d565af4c2be937295792089aeb56d9d.tar.bz2
drakx-6ea016b32d565af4c2be937295792089aeb56d9d.tar.xz
drakx-6ea016b32d565af4c2be937295792089aeb56d9d.zip
fix for auto updates.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_steps.pm b/perl-install/install_steps.pm
index ef8235c0b..14396d13d 100644
--- a/perl-install/install_steps.pm
+++ b/perl-install/install_steps.pm
@@ -591,12 +591,12 @@ sub installCrypto {
sub installUpates {
my ($o) = @_;
- my $u = $o->{updates} or return; $u->{updates} && $u->{packages} or return;
+ my $u = $o->{updates} or return; $u->{updates} or return;
upNetwork($o);
require crypto;
my @crypto_packages = crypto::getPackages($o->{prefix}, $o->{packages}, $u->{mirror});
- $o->pkg_install(@{$u->{packages}});
+ $o->pkg_install(@{$u->{packages} || []});
}
sub summary {