pyrox.dev
1diff -rc DBD-SQLite-1.29/Makefile.PL DBD-SQLite-1.29-new/Makefile.PL
2*** DBD-SQLite-1.29/Makefile.PL 2010-01-08 10:08:29.000000000 +0100
3--- DBD-SQLite-1.29-new/Makefile.PL 2010-08-05 11:42:53.000000000 +0200
4***************
5*** 123,129 ****
6 # a system sqlite is also sophisticated enough to have a patching system
7 # that can change the if ( 0 ) to if ( 1 )
8 my ($sqlite_local, $sqlite_base, $sqlite_lib, $sqlite_inc);
9! if ( 0 ) {
10 require File::Spec;
11 if ( $sqlite_base = (grep(/SQLITE_LOCATION=.*/, @ARGV))[0] ) {
12 $sqlite_base =~ /=(.*)/;
13--- 123,129 ----
14 # a system sqlite is also sophisticated enough to have a patching system
15 # that can change the if ( 0 ) to if ( 1 )
16 my ($sqlite_local, $sqlite_base, $sqlite_lib, $sqlite_inc);
17! if ( 1 ) {
18 require File::Spec;
19 if ( $sqlite_base = (grep(/SQLITE_LOCATION=.*/, @ARGV))[0] ) {
20 $sqlite_base =~ /=(.*)/;
21***************
22*** 184,191 ****
23 } else {
24 # Always the bundled one.
25 # XXX: ... and this message should be more informative.
26! $sqlite_local = 1;
27! print "We're using the bundled sqlite library.\n" if $ENV{AUTOMATED_TESTING};
28 }
29
30 @ARGV = grep( ! /SQLITE_LOCATION|USE_LOCAL_SQLITE/, @ARGV );
31--- 184,191 ----
32 } else {
33 # Always the bundled one.
34 # XXX: ... and this message should be more informative.
35! # $sqlite_local = 1;
36! # print "We're using the bundled sqlite library.\n" if $ENV{AUTOMATED_TESTING};
37 }
38
39 @ARGV = grep( ! /SQLITE_LOCATION|USE_LOCAL_SQLITE/, @ARGV );