diff options
| author | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-03-11 17:42:33 +0000 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@mandriva.org> | 2005-03-11 17:42:33 +0000 |
| commit | 3a5b2dc01ae6e2d2e7deb1a6ea5bc242d4873dc4 (patch) | |
| tree | a3dbb01ba51f51e1f308d3cf9450e9a483ab0e30 /perl-install | |
| parent | 87206f3ef535d1d7bbdec0ab2455ea05073156c2 (diff) | |
| download | drakx-3a5b2dc01ae6e2d2e7deb1a6ea5bc242d4873dc4.tar drakx-3a5b2dc01ae6e2d2e7deb1a6ea5bc242d4873dc4.tar.gz drakx-3a5b2dc01ae6e2d2e7deb1a6ea5bc242d4873dc4.tar.bz2 drakx-3a5b2dc01ae6e2d2e7deb1a6ea5bc242d4873dc4.tar.xz drakx-3a5b2dc01ae6e2d2e7deb1a6ea5bc242d4873dc4.zip | |
When removing duplicate physical media, take DVDs into account as well as CDs
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/install_steps_gtk.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/perl-install/install_steps_gtk.pm b/perl-install/install_steps_gtk.pm index 5df11bed2..ecaa846ae 100644 --- a/perl-install/install_steps_gtk.pm +++ b/perl-install/install_steps_gtk.pm @@ -641,7 +641,7 @@ sub deselectFoundMedia { my $i = 0; my $totalsize = 0; foreach (@$hdlists) { - (my $cd) = $_->[3] =~ /\bCD ?(\d+)\b/i; + (my $cd) = $_->[3] =~ /\b(?:CD|DVD) ?(\d+)\b/i; if (!$cd || !@{$cdlist{$cd} || []}) { push @hdlist2, $_; $corresp[$i] = [ $i ]; |