You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by jo...@apache.org on 2005/03/08 05:54:37 UTC
svn commit: r156499 -
perl/modperl/branches/apache2-rename-unstable/lib/ModPerl/WrapXS.pm
Author: joes
Date: Mon Mar 7 20:54:34 2005
New Revision: 156499
URL: http://svn.apache.org/viewcvs?view=rev&rev=156499
Log:
Needs mod_perl2.
Modified:
perl/modperl/branches/apache2-rename-unstable/lib/ModPerl/WrapXS.pm
Modified: perl/modperl/branches/apache2-rename-unstable/lib/ModPerl/WrapXS.pm
URL: http://svn.apache.org/viewcvs/perl/modperl/branches/apache2-rename-unstable/lib/ModPerl/WrapXS.pm?view=diff&r1=156498&r2=156499
==============================================================================
--- perl/modperl/branches/apache2-rename-unstable/lib/ModPerl/WrapXS.pm (original)
+++ perl/modperl/branches/apache2-rename-unstable/lib/ModPerl/WrapXS.pm Mon Mar 7 20:54:34 2005
@@ -397,9 +397,9 @@
sub module_version {
local $_ = shift;
- require mod_perl;
+ require mod_perl2;
# XXX: for now APR gets its libapr-0.9 version
- return /^APR/ ? "0.009000" : "$mod_perl::VERSION";
+ return /^APR/ ? "0.009000" : "$mod_perl2::VERSION";
}
sub write_makefilepl {
@@ -419,7 +419,7 @@
$deps = Dumper $deps;
my $noedit_warning = $self->ModPerl::Code::noedit_warning_hash();
- require mod_perl;
+ require mod_perl2;
my $version = module_version($class);
print $fh <<EOF;
@@ -1133,7 +1133,7 @@
$len = length $_ if length $_ > $len;
}
- require mod_perl;
+ require mod_perl2;
$len += length '$::VERSION';
for (@modules) {
my $ver = module_version($_);