dougm 02/05/12 12:09:54
Modified: . Makefile.PL
lib/Apache Build.pm
Log:
s/Apache::Build::is_win32/Apache::Build::WIN32/g
Revision Changes Path
1.77 +3 -3 modperl-2.0/Makefile.PL
Index: Makefile.PL
===================================================================
RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
retrieving revision 1.76
retrieving revision 1.77
diff -u -r1.76 -r1.77
--- Makefile.PL 9 Apr 2002 01:42:42 -0000 1.76
+++ Makefile.PL 12 May 2002 19:09:54 -0000 1.77
@@ -53,7 +53,7 @@
#Stop.
#NMAKE : fatal error U1077: 'cd' : return code '0x2'
#Stop.
-my @remote_makefile_dirs = Apache::Build::is_win32() ? () :
+my @remote_makefile_dirs = Apache::Build::WIN32() ? () :
qw(docs/api/mod_perl-2.0);
configure();
@@ -105,7 +105,7 @@
}
}
- if (Apache::Build::is_win32()) {
+ if (Apache::Build::WIN32()) {
#Makefile.PL's in WrapXS/ just need to pass the -e mod_perl.lib test
#the real mod_perl.lib will be in place when WrapXS/ dll's are
#actually linked
@@ -271,7 +271,7 @@
}
sub system_sanity_check {
- return if $build->is_win32;
+ return if Apache::Build::WIN32;
my $ccflags = $build->perl_config('ccflags');
for (split /\s+/, $ccflags) {
1.81 +3 -3 modperl-2.0/lib/Apache/Build.pm
Index: Build.pm
===================================================================
RCS file: /home/cvs/modperl-2.0/lib/Apache/Build.pm,v
retrieving revision 1.80
retrieving revision 1.81
diff -u -r1.80 -r1.81
--- Build.pm 11 May 2002 18:55:41 -0000 1.80
+++ Build.pm 12 May 2002 19:09:54 -0000 1.81
@@ -18,7 +18,7 @@
use constant HAS_ITHREADS =>
$Config{useithreads} && ($Config{useithreads} eq 'define');
-use constant is_win32 => $^O eq 'MSWin32';
+use constant WIN32 => $^O eq 'MSWin32';
use constant IS_MOD_PERL_BUILD => grep { -e "$_/lib/mod_perl.pm" } qw(. ..);
our $VERSION = '0.01';
@@ -551,7 +551,7 @@
sub mmn_eq {
my($class, $dir) = @_;
- return 1 if is_win32; #just assume, till Apache::Build works under win32
+ return 1 if WIN32; #just assume, till Apache::Build works under win32
my $instsrc;
{
@@ -977,7 +977,7 @@
sub includes {
my $self = shift;
my $src = $self->dir;
- my $os = is_win32 ? 'win32' : 'unix';
+ my $os = WIN32 ? 'win32' : 'unix';
my @inc = $self->file_path("src/modules/perl", "xs");
push @inc, $self->mp_include_dir;