simcop2387/DBD-SQLite-SQLcipher
1
0
Fork 0
mirror of https://github.com/DBD-SQLite/DBD-SQLite synced 2025-06-07 22:28:47 -04:00
Code Issues Releases Wiki Activity

DBD-SQLite: tweaked Makefile.PL to support older HP-UX

Browse source
This commit is contained in:
Kenichi Ishigaki 2009-04-14 12:35:45 +00:00
parent de2f662a34
commit 1d5d163a8b
1 changed files with 23 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
Makefile.PL
View file

@ -255,6 +255,8 @@ WriteMakefile(
package MY; package MY;
use Config;
sub postamble { sub postamble {
require DBI; require DBI;
require DBI::DBD; require DBI::DBD;
@ -268,3 +270,24 @@ sub libscan {
return if $path =~ /\.pl$/; return if $path =~ /\.pl$/;
($path =~ m/\~$/) ? undef : $path; ($path =~ m/\~$/) ? undef : $path;
} }
sub test_via_harness {
my ($self, $perl, $tests) = @_;
if ($^O eq 'hpux' and $Config{osvers} <= 10.20) {
return qq{\tPERL_DL_NONLAZY=0 $perl "-MExtUtils::Command::MM" }.
qq{"-e" "test_harness(\$(TEST_VERBOSE), '\$(INST_LIB)', '\$(INST_ARCHLIB)')" $tests\n};
}
else {
$self->SUPER::test_via_harness($perl, $tests);
}
}
sub test_via_script {
my ($self, $perl, $script) = @_;
if ($^O eq 'hpux' and $Config{osvers} <= 10.20) {
return qq{\tPERL_DL_NONLAZY=0 $perl "-I\$(INST_LIB)" "-I\$(INST_ARCHLIB)" $script\n};
}
else {
$self->SUPER::test_via_script($perl, $script);
}
}