- factorize snd devices listing in detect_devices::getSoundDevices()

  so that each caller is ppc aware
- factorize sound slots configuration into
  harddrake::sound::configure_sound_slots() so that harddrake service
  will eventually set them at bootstrapping time

1 files changed, 9 insertions, 0 deletions

diff --git a/perl-install/harddrake/sound.pm b/perl-install/harddrake/sound.pm
index cbf2f3ed0..5a65ff702 100644
--- a/perl-install/harddrake/sound.pm
+++ b/perl-install/harddrake/sound.pm
@@ -21,6 +21,7 @@ use run_program;
 use modules;
 use standalone;
 use list_modules;
+use detect_devices;
 
 my $has_nvaudio = -x '/lib/modules/' . c::kernel_version() . '/';
 
@@ -259,4 +260,12 @@ initlevel 3
 ")));
 }
 
+
+sub configure_sound_slots {
+    each_index {
+        modules::add_alias("sound-slot-$::i", $_->{driver});
+      } getSoundDevices();
+}
+
+
 1;