summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/install_steps_interactive.pm5
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install_steps_interactive.pm b/perl-install/install_steps_interactive.pm
index cf0fafde4..e793aa449 100644
--- a/perl-install/install_steps_interactive.pm
+++ b/perl-install/install_steps_interactive.pm
@@ -678,7 +678,10 @@ sub chooseCD {
if (!common::usingRamdisk()) {
#- mono-cd in case of no ramdisk
- undef $packages->{mediums}{$_}{selected} foreach @mediums;
+ foreach (@mediums) {
+ pkgs::mediumDescr($packages, $install_any::boot_medium) eq pkgs::mediumDescr($packages, $_) and next;
+ undef $packages->{mediums}{$_}{selected};
+ }
log::l("low memory install, using single CD installation (as it is not ejectable)");
return;
}