diff options
-rwxr-xr-x | perl-install/standalone/harddrake2 | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 16ee620a0..17b5d702e 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -134,7 +134,10 @@ my %groups = ( }, ); -$groups{$_} = $groups{HARDDISK} foreach qw(BURNER CDROM DVDROM); +foreach my $class (qw(BURNER CDROM DVDROM)) { + $groups{$class} = $groups{HARDDISK}; + $fields{$class} = $fields{HARDDISK}; +} my ($in, $pid, $w); |