aboutsummaryrefslogtreecommitdiff
path: root/audio/squeezecenter/files/patch-Bin_build-perl-modules.pl
diff options
context:
space:
mode:
Diffstat (limited to 'audio/squeezecenter/files/patch-Bin_build-perl-modules.pl')
-rw-r--r--audio/squeezecenter/files/patch-Bin_build-perl-modules.pl151
1 files changed, 0 insertions, 151 deletions
diff --git a/audio/squeezecenter/files/patch-Bin_build-perl-modules.pl b/audio/squeezecenter/files/patch-Bin_build-perl-modules.pl
deleted file mode 100644
index cc52da3652a6..000000000000
--- a/audio/squeezecenter/files/patch-Bin_build-perl-modules.pl
+++ /dev/null
@@ -1,151 +0,0 @@
-
-$FreeBSD$
-
---- Bin/build-perl-modules.pl.orig
-+++ Bin/build-perl-modules.pl
-@@ -24,14 +24,14 @@
-
- # The list of all the packages needed.
- my %packages = (
-- 'Compress::Zlib' => 'Compress-Zlib-1.41.tar.gz',
-- 'DBI' => 'DBI-1.50.tar.gz',
-- 'DBD::mysql' => 'DBD-mysql-3.0002.tar.gz',
-- 'Digest::SHA1' => 'Digest-SHA1-2.11.tar.gz',
-- 'HTML::Parser' => 'HTML-Parser-3.48.tar.gz',
-- 'Template' => 'Template-Toolkit-2.15.tar.gz',
-- 'Time::HiRes' => 'Time-HiRes-1.86.tar.gz',
-- 'XML::Parser::Expat' => 'XML-Parser-2.34.tar.gz',
-+# 'Compress::Zlib' => 'Compress-Zlib-1.41.tar.gz',
-+# 'DBI' => 'DBI-1.50.tar.gz',
-+# 'DBD::mysql' => 'DBD-mysql-3.0002.tar.gz',
-+# 'Digest::SHA1' => 'Digest-SHA1-2.11.tar.gz',
-+# 'HTML::Parser' => 'HTML-Parser-3.48.tar.gz',
-+# 'Template' => 'Template-Toolkit-2.15.tar.gz',
-+# 'Time::HiRes' => 'Time-HiRes-1.86.tar.gz',
-+# 'XML::Parser::Expat' => 'XML-Parser-2.34.tar.gz',
- 'YAML::Syck' => 'YAML-Syck-0.64.tar.gz',
- );
-
-@@ -57,6 +57,13 @@
-
- 'env' => [qw(DBI-1.50/blib/lib: DBI-1.50/blib/arch)],
- },
-+
-+ 'XML-Parser-2.34' => {
-+ 'Makefile.PL' => join(' ', qw(
-+ EXPATLIBPATH="%%LOCALBASE%%/lib"
-+ EXPATINCPATH="%%LOCALBASE%%/include"
-+ )),
-+ },
- );
-
- sub main {
-@@ -73,28 +80,14 @@
-
- print "*** Ignore any warnings about AppConfig. ***\n\n";
-
-- print "Please enter a perl binary to use (defaults to /usr/bin/perl)\n";
-- print "This must be the same perl binary that you ran this program with --> ";
-- chomp($perlBinary = <STDIN>);
--
-- $perlBinary ||= '/usr/bin/perl';
-+ $perlBinary = '/usr/bin/perl';
-
- unless (-f $perlBinary && -x $perlBinary) {
- die "Couldn't find a perl binary. Exiting.\n";
- }
-
- # Where does their slimserver live? Try to guess.
-- if (-f 'slimserver.pl' && -d 'CPAN/arch') {
--
-- $slimServerPath = cwd();
--
-- } else {
--
-- print "Please enter the path to your SlimServer directory (ex: /usr/local/slimserver) --> ";
-- chomp($slimServerPath = <STDIN>);
-- }
--
-- $slimServerPath ||= '/usr/local/slimserver';
-+ $slimServerPath ||= '%%TMP_SLIMDIR%%';
-
- unless (-d $slimServerPath) {
- die "Couldn't find a valid SlimServer path. Exiting.\n";
-@@ -109,12 +102,7 @@
- # This is where the binaries will end up.
- my $cpanDest = "$slimServerPath/CPAN/arch/$version/$archname/auto";
-
-- # Where do they want the downloads to go?
-- print "Please enter a directory to download files to --> ";
-- chomp($downloadPath = <STDIN>);
--
-- # Default to the current directory.
-- $downloadPath ||= '.';
-+ $downloadPath = '%%CPANWRKDIR%%';
-
- # Remove trailing slash
- $downloadPath =~ s|^(.+?)/$|$1|;
-@@ -127,30 +115,6 @@
-
- my $pwd = cwd();
-
-- # What do we want to download with?
-- eval { require LWP::Simple };
--
-- # No LWP - try a command line program.
-- if ($@) {
--
-- for my $cmd (qw(curl wget)) {
--
-- if ($downloadUsing = which($cmd)) {
-- last;
-- }
-- }
--
-- } else {
--
-- $downloadUsing = 'lwp';
-- }
--
-- unless ($downloadUsing) {
-- die "Couldn't find any valid downloaders - install LWP, wget or curl.\n";
-- } else {
-- print "Downloads will use $downloadUsing to fetch tarballs.\n";
-- }
--
- # Only download the packages that were passsed.
- my @packages = ();
-
-@@ -189,30 +153,8 @@
-
- chdir($pwd) or die "Couldn't change to $pwd : $!";
-
-- print "\nDownloading $package to: $pwd\n";
--
-- # Remove any previous version.
-- unlink $package;
--
-- if ($downloadUsing eq 'lwp') {
--
-- LWP::Simple::getstore("$SOURCE/$package?view=auto", $package);
--
-- } elsif ($downloadUsing =~ /curl$/) {
--
-- `$downloadUsing --silent -o $package $SOURCE/$package?view=auto`;
--
-- } else {
--
-- `$downloadUsing -q -O $package $SOURCE/$package?view=auto`;
-- }
--
-- unless (-r $package) {
-- print "Something looks wrong - I couldn't read $pwd/$package, which I just downloaded.\n";
-- }
--
-- print "Uncompressing..\n";
-- `gzip -d < $package | tar xvf -`;
-+ print "\nExtracting $package in: $pwd\n";
-+ `tar xfvz %%DISTDIR%%/$package`;
-
- unlink $package;
-