diff options
author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-04-01 16:45:11 +0000 |
---|---|---|
committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-04-01 16:45:11 +0000 |
commit | 9ff529d34ecc582c47f98aa39f185193170b7d76 (patch) | |
tree | 744560b3fbc04cf643e2341af898aee520a5449b /perl-install | |
parent | a614a3f19063419ca7eb5287ef4776fef57fd55f (diff) | |
download | drakx-9ff529d34ecc582c47f98aa39f185193170b7d76.tar drakx-9ff529d34ecc582c47f98aa39f185193170b7d76.tar.gz drakx-9ff529d34ecc582c47f98aa39f185193170b7d76.tar.bz2 drakx-9ff529d34ecc582c47f98aa39f185193170b7d76.tar.xz drakx-9ff529d34ecc582c47f98aa39f185193170b7d76.zip |
When presenting the list of media to deselect, group by CDs even when using the
mini ISO
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install_steps_gtk.pm | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 78819ef5e..411d0ceaf 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -643,6 +643,9 @@ sub deselectFoundMedia { my $totalsize = 0; foreach (@$hdlists) { (my $cd) = $_->[3] =~ /\b(?:CD|DVD) ?(\d+)\b/i; + if (!$cd) { #- test for mini-ISO + $cd = 1 if $_->[3] =~ /\bmini.?cd\b/i; + } if (!$cd || !@{$cdlist{$cd} || []}) { push @hdlist2, $_; $corresp[$i] = [ $i ]; |