diff options
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_any.pm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 079005901..cd7079970 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -712,8 +712,8 @@ Please insert the Cd-Rom labelled \"%s\" in your drive and press Ok when done.", }; foreach my $k (pkgs::allMediums($o->{packages})) { my $m = $o->{packages}{mediums}{$k}; - #- don't copy rpms of supplementary media, except suppl CDs - next if $m->{issuppl} && $m->{medium} !~ /^\d+s$/; + #- don't copy rpms of supplementary media + next if $m->{issuppl};#- && $m->{medium} !~ /^\d+s$/; XXX handle suppl CDs my ($wait_w, $wait_message) = fs::format::wait_message($o); #- nb, this is only called when interactive $wait_message->(N("Copying in progress") . "\n($m->{descr})"); #- XXX to be translated if ($k != $current_medium) { |