From fb244376d0399f54b303f6fb24b1018afa84526f Mon Sep 17 00:00:00 2001 From: Olivier Blin Date: Mon, 30 Nov 2009 14:27:39 +0000 Subject: fix adding additional media with type media_cfg (for auto_install) --- perl-install/install/media.pm | 1 + 1 file changed, 1 insertion(+) (limited to 'perl-install/install/media.pm') diff --git a/perl-install/install/media.pm b/perl-install/install/media.pm index da8becd7f..6e555fd7b 100644 --- a/perl-install/install/media.pm +++ b/perl-install/install/media.pm @@ -503,6 +503,7 @@ sub get_media { foreach (@$media) { if ($_->{type} eq 'media_cfg') { $phys_m = url2mounted_phys_medium($o, $_->{url}, 'media_info'); + local $phys_m->{is_suppl} = $_->{url} ne "drakx://media"; # so that _get_media_url() works ($suppl_CDs, $copy_rpms_on_disk) = get_media_cfg($o, $phys_m, $packages, $_->{selected_names}, $_->{force_rpmsrate}); } elsif ($_->{type} eq 'media') { $phys_m = url2mounted_phys_medium($o, $_->{url}); -- cgit v1.2.1