From 5de74f5ec6dc3aaf9cfd204be0ec4ab366089d91 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fr=C3=A9d=C3=A9ric=20Buclin?= Date: Fri, 5 May 2017 22:58:56 +0200 Subject: Make sure 'supplmedia' is defined before using it (mga#20484) --- perl-install/install/media.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') 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' ])); -- cgit v1.2.1