diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2003-09-16 17:48:14 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2003-09-16 17:48:14 +0000 |
| commit | e2c2aa4270fa25632e03f7b24c783c009e5234fb (patch) | |
| tree | 45a40538535caaeaef86f74f3da520b840c48e47 /perl-install | |
| parent | 158b7107ff1a888bf91aff7e4f4b25cd395302cb (diff) | |
| download | drakx-backup-do-not-use-e2c2aa4270fa25632e03f7b24c783c009e5234fb.tar drakx-backup-do-not-use-e2c2aa4270fa25632e03f7b24c783c009e5234fb.tar.gz drakx-backup-do-not-use-e2c2aa4270fa25632e03f7b24c783c009e5234fb.tar.bz2 drakx-backup-do-not-use-e2c2aa4270fa25632e03f7b24c783c009e5234fb.tar.xz drakx-backup-do-not-use-e2c2aa4270fa25632e03f7b24c783c009e5234fb.zip | |
fix #5403:
- make sure to use OptionMenu instead of Combo boxes
- move help into a tooltip
Diffstat (limited to 'perl-install')
| -rw-r--r-- | perl-install/harddrake/sound.pm | 9 |
1 files changed, 4 insertions, 5 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm index acef35303..f924d4832 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -171,6 +171,8 @@ sub switch { if ($alternative) { my $new_driver = $driver; push @$alternative, $driver; + my %des = modules::category2modules_and_description('multimedia/sound'); + if ($new_driver eq 'unknown') { $in->ask_from(N("No alternative driver"), N("There's no known OSS/ALSA alternative driver for your sound card (%s) which currently uses \"%s\"", @@ -200,10 +202,7 @@ To use alsa, one can either use: [ { label => N("Driver:"), val => \$new_driver, list => $alternative, default => $new_driver, sort =>1, - format => sub { - my %des = modules::category2modules_and_description('multimedia/sound'); - "$_[0] (" . $des{$_[0]} . ')'; - }, + help => join("\n\n", map { "\"$_\": " . $des{$_} } @$alternative), allow_empty_list => 1, }, { @@ -296,7 +295,7 @@ sub configure_sound_slots() { each_index { my $default_driver = modules::get_alias("sound-slot-$::i"); if (!member($default_driver, @{get_alternative($_->{driver})}, $_->{driver})) { - $altered ||= $default_driver ; + $altered ||= $default_driver; modules::add_alias("sound-slot-$::i", $_->{driver}); } } detect_devices::getSoundDevices(); |