diff options
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/harddrake2 | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/perl-install/standalone/harddrake2 b/perl-install/standalone/harddrake2 index 6127f3b6b..627d355af 100755 --- a/perl-install/standalone/harddrake2 +++ b/perl-install/standalone/harddrake2 @@ -273,6 +273,11 @@ foreach (@harddrake::data::tree) { my $i = $_; $_->{bus_location} = join ':', map { sprintf("%lx", $i->{$_}) } qw(channel id lun); } + if (defined $_->{capacity}) { + my ($burner, $dvd) = (N("burner"), N("DVD")); + $_->{capacity} =~ s/burner/$burner/; + $_->{capacity} =~ s/DVD/$dvd/; + } $configurator .= harddrake::data::set_removable_configurator($Ident, $_); if ($Ident eq "AUDIO") { require harddrake::sound; |