add draksound: allow to switch between alsa and oss;

should result in better sound support

1 files changed, 18 insertions, 0 deletions

diff --git a/perl-install/harddrake/gen_snd_list b/perl-install/harddrake/gen_snd_list
new file mode 100755
index 000000000..e791ae431
--- /dev/null
+++ b/perl-install/harddrake/gen_snd_list
@@ -0,0 +1,18 @@
+#!/usr/bin/perl
+# 
+# Copyright (C) 2002 MandrakeSoft (tvignaud@mandrakesoft.com)
+# Released under the GNU General Public License
+
+use lib qw(/usr/lib/libDrakX);
+use common;
+use list_modules;
+use Data::Dumper;
+
+$Data::Dumper::Terse = 1;          # don't output names where feasible
+$Data::Dumper::Purity = 1;         # fill in the holes for eval
+
+# ne '' for missing modules ... if_($i ne '', $i, '<none>')
+print "package harddrake::sound_drivers;\n#This is an autogenrated file by gen_snd_list from list_modules.pm\nour\$sound_drivers = ", Dumper({map { my $i=qx((/sbin/modinfo -d $_)|head -1|tr -d \\\"|perl -pi -e 's!\n!!g'); $_ => $i } category2modules("multimedia/sound")}), ";\n1;";
+#print qq(
+#sub
+#)