diff options
Diffstat (limited to 'perl-install/harddrake/sound.pm')
| -rw-r--r-- | perl-install/harddrake/sound.pm | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm index 9069966ef..85f5790d9 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -21,7 +21,6 @@ use common; use interactive; use run_program; use modules; -use harddrake::sound_drivers; # autogenerated use standalone; my %alsa2oss = @@ -118,9 +117,6 @@ my %oss2alsa = "ymfpci" => [ "snd-ymfpci" ] ); -my $drivers_description = $harddrake::sound_drivers::sound_drivers; - - sub get_alternative { my ($driver) = @_; if ($alsa2oss{$driver}) { @@ -164,9 +160,11 @@ sub switch { _("Here you can select an alternative driver (either OSS or ALSA) for your sound card (%s)", $device->{description}), [ - { label => _("Driver :"), val => \$new_driver, list => $alternative, default => $new_driver, sort =>1, format => sub { "$_[0] ($drivers_description->{$_[0]})" }, allow_empty_list => 1 } - ] - )) + { label => _("Driver :"), val => \$new_driver, list => $alternative, default => $new_driver, sort =>1, format => sub { + my %des = modules::category2modules_and_description('multimedia/sound'); + "$_[0] (". $des{$_[0]}; + }, allow_empty_list => 1 } + ])) { standalone::explanations("switching audio driver from '$driver' to '$new_driver'\n"); do_switch($driver, $new_driver); |