summaryrefslogtreecommitdiffstats
path: root/perl-install/harddrake/sound.pm
diff options
context:
space:
mode:
Diffstat (limited to 'perl-install/harddrake/sound.pm')
-rw-r--r--perl-install/harddrake/sound.pm7
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;
}