summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrédéric Buclin <LpSolit@gmail.com>2017-05-05 22:58:56 +0200
committerFrédéric Buclin <LpSolit@gmail.com>2017-05-05 22:58:56 +0200
commit5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91 (patch)
tree5f1b975e3dfd2a442cead8af0c2a75fcda3e2912 /perl-install
parent9b821234711772b1d0fb7b2c4aeaa4205c770106 (diff)
downloaddrakx-5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91.tar
drakx-5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91.tar.gz
drakx-5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91.tar.bz2
drakx-5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91.tar.xz
drakx-5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91.zip
Make sure 'supplmedia' is defined before using it (mga#20484)
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install/media.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm
index 17d941b1d..9f5fb34c1 100644
--- a/perl-install/install/media.pm
+++ b/perl-install/install/media.pm
@@ -648,7 +648,7 @@ sub get_media_cfg {
die "media.cfg not found";
}
- my $suppl_CDs = exists $o->{supplmedia} ? $o->{supplmedia} : $distribconf->{suppl} || 0;
+ my $suppl_CDs = defined $o->{supplmedia} ? $o->{supplmedia} : $distribconf->{suppl} || 0;
my $deselectionAllowed = $distribconf->{askmedia} || $o->{askmedia} || 0;
log::l(Data::Dumper->Dump([ $phys_medium ], [ 'phys_medium' ]));