summaryrefslogtreecommitdiffstats
path: root/perl-install/harddrake/sound.pm
diff options
context:
space:
mode:
authorThierry Vignaud <tvignaud@mandriva.org>2002-08-20 19:05:49 +0000
committerThierry Vignaud <tvignaud@mandriva.org>2002-08-20 19:05:49 +0000
commit6a0ff73a3f52d337083fce20fb2b889884c11690 (patch)
tree92ee6f68deb0a909d7ff5c55c960215d0649d07e /perl-install/harddrake/sound.pm
parent31642de8806104ca44bf47accb5443d9e7a63d75 (diff)
downloaddrakx-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.pm12
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);