diff options
Diffstat (limited to 'audio/squeezeboxserver/files/patch-Bin_build-perl-modules.pl')
-rw-r--r-- | audio/squeezeboxserver/files/patch-Bin_build-perl-modules.pl | 151 |
1 files changed, 0 insertions, 151 deletions
diff --git a/audio/squeezeboxserver/files/patch-Bin_build-perl-modules.pl b/audio/squeezeboxserver/files/patch-Bin_build-perl-modules.pl deleted file mode 100644 index cc52da3652a6..000000000000 --- a/audio/squeezeboxserver/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; - |