diff options
Diffstat (limited to 'perl-install/harddrake')
| -rw-r--r-- | perl-install/harddrake/sound.pm | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm index 0996d9001..acef35303 100644 --- a/perl-install/harddrake/sound.pm +++ b/perl-install/harddrake/sound.pm @@ -294,8 +294,11 @@ The current driver for your \"%s\" sound card is \"%s\" ", $device->{description sub configure_sound_slots() { my $altered = 0; each_index { - $altered ||= modules::get_alias("sound-slot-$::i") ne $_->{driver}; - modules::add_alias("sound-slot-$::i", $_->{driver}); + my $default_driver = modules::get_alias("sound-slot-$::i"); + if (!member($default_driver, @{get_alternative($_->{driver})}, $_->{driver})) { + $altered ||= $default_driver ; + modules::add_alias("sound-slot-$::i", $_->{driver}); + } } detect_devices::getSoundDevices(); modules::write_conf() if $altered && $::isStandalone; } |