summaryrefslogtreecommitdiff
blob: 37de856422d67ae5f4428d725c2a1cae01a7cedb (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
--- Bin/build-perl-modules.pl.old	2009-01-04 17:55:46.000000000 +0000
+++ Bin/build-perl-modules.pl	2009-01-05 18:53:33.000000000 +0000
@@ -21,24 +21,12 @@
 
 # NOTE: If you change this in a future version of SC, create a new
 # versioned directory under vendor/src for all files for that version
-my $SOURCE = 'http://svn.slimdevices.com/repos/slim/vendor/src/7.3';
 my $dlext  = $Config{'dlext'};
 
 # The list of all the packages needed.
 my %packages = (
 	'Class::XSAccessor::Array' => 'Class-XSAccessor-Array-0.05.tar.gz',
-	'Compress::Zlib'           => 'Compress-Zlib-1.41.tar.gz',
-	'DBI'                      => 'DBI-1.604.tar.gz',
-	'DBD::mysql'               => 'DBD-mysql-3.0002.tar.gz',
-	'Digest::SHA1'             => 'Digest-SHA1-2.11.tar.gz',
-	'Encode::Detect'           => 'Encode-Detect-1.00.tar.gz',
-	'JSON::XS'                 => 'JSON-XS-1.5.tar.gz',
-	'HTML::Parser'             => 'HTML-Parser-3.48.tar.gz',
 	'POE::XS::Queue::Array'    => 'POE-XS-Queue-Array-0.002.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',
 );
 
 # Don't need Class::C3::XS if you're running 5.10
@@ -196,36 +184,16 @@
 		}
 	}
 
+	# Utilise AutoXS::Header as we need that to support the following builds.
+	chdir($pwd) or die "Couldn't change to $pwd : $!";
+	# Include this when performing the following builds.
+	$ENV{'PERL5LIB'} = cwd() . "/AutoXS-Header-0.03/lib";
+
 	for my $package (@packages) {
 
 		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 -`;
-
-		unlink $package;
+		print "\nBuilding $package\n";
 
 		# Just the directory name.
 		my ($packageDir) = ($package =~ /(\S+?)\.tar\.gz/);
--- Slim/bootstrap.pm.old	2008-11-22 15:14:07.000000000 +0000
+++ Slim/bootstrap.pm	2008-11-22 15:14:30.000000000 +0000
@@ -176,7 +176,6 @@
 
 		print "The following modules failed to load: $failed\n\n";
 
-		print "To download and compile them, please run: $libPath/Bin/build-perl-modules.pl $failed\n\n";
 		print "Exiting..\n";
 
 		exit;