diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-08-20 19:05:49 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-08-20 19:05:49 +0000 |
| commit | 6a0ff73a3f52d337083fce20fb2b889884c11690 (patch) | |
| tree | 92ee6f68deb0a909d7ff5c55c960215d0649d07e /perl-install/harddrake/sound.pm | |
| parent | 31642de8806104ca44bf47accb5443d9e7a63d75 (diff) | |
| download | drakx-backup-do-not-use-6a0ff73a3f52d337083fce20fb2b889884c11690.tar drakx-backup-do-not-use-6a0ff73a3f52d337083fce20fb2b889884c11690.tar.gz drakx-backup-do-not-use-6a0ff73a3f52d337083fce20fb2b889884c11690.tar.bz2 drakx-backup-do-not-use-6a0ff73a3f52d337083fce20fb2b889884c11690.tar.xz drakx-backup-do-not-use-6a0ff73a3f52d337083fce20fb2b889884c11690.zip | |
instead of generating my own list of module descriptions from
list_modules.pm list of sound modules, just
usemodules::category2modules_and_description
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); |