diff options
-rw-r--r-- | perl-install/install_steps_interactive.pm | 5 |
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; } |