diff options
| author | Thierry Vignaud <tvignaud@mandriva.org> | 2002-08-20 17:15:47 +0000 |
|---|---|---|
| committer | Thierry Vignaud <tvignaud@mandriva.org> | 2002-08-20 17:15:47 +0000 |
| commit | 250ef385d4f7a7825b7490c42681d6b9a809432b (patch) | |
| tree | 06a3d0bfd6acc577c50cf2a2a200ffdf3d72db49 /perl-install/harddrake/gen_snd_list | |
| parent | 899f293944ef786470f73e7497da3453313cb320 (diff) | |
| download | drakx-250ef385d4f7a7825b7490c42681d6b9a809432b.tar drakx-250ef385d4f7a7825b7490c42681d6b9a809432b.tar.gz drakx-250ef385d4f7a7825b7490c42681d6b9a809432b.tar.bz2 drakx-250ef385d4f7a7825b7490c42681d6b9a809432b.tar.xz drakx-250ef385d4f7a7825b7490c42681d6b9a809432b.zip | |
add draksound: allow to switch between alsa and oss;
should result in better sound support
Diffstat (limited to 'perl-install/harddrake/gen_snd_list')
| -rwxr-xr-x | perl-install/harddrake/gen_snd_list | 18 |
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 +#) |