diff options
Diffstat (limited to 'perl-install/harddrake/gen_snd_list')
-rwxr-xr-x | perl-install/harddrake/gen_snd_list | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/perl-install/harddrake/gen_snd_list b/perl-install/harddrake/gen_snd_list deleted file mode 100755 index e791ae431..000000000 --- a/perl-install/harddrake/gen_snd_list +++ /dev/null @@ -1,18 +0,0 @@ -#!/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 -#) |