diff options
Diffstat (limited to 'perl-install/install/any.pm')
-rw-r--r-- | perl-install/install/any.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install/any.pm b/perl-install/install/any.pm index 6a6bb3d4c..3f47b3c82 100644 --- a/perl-install/install/any.pm +++ b/perl-install/install/any.pm @@ -332,7 +332,7 @@ sub selectSupplMedia { $phys_medium->{$field} = $val; #- try using media_info/hdlist.cz - my $medium_id = int(@{$o->{packages}{mediums}}); + my $medium_id = int(@{$o->{packages}{media}}); eval { install::media::get_standalone_medium($o, $phys_medium, $o->{packages}, { name => "Supplementary media $medium_id" }) }; if (!$@) { log::l("read suppl hdlist (via $method)"); |