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 ra...@apache.org on 2007/04/02 01:04:53 UTC

svn commit: r524700 - /perl/modperl/branches/1.x/Makefile.PL

Author: randyk
Date: Sun Apr  1 16:04:52 2007
New Revision: 524700

URL: http://svn.apache.org/viewvc?view=rev&rev=524700
Log:
Add /D _WINSOCK2API_ for perl < 5.8.6 on Win32.

Modified:
    perl/modperl/branches/1.x/Makefile.PL

Modified: perl/modperl/branches/1.x/Makefile.PL
URL: http://svn.apache.org/viewvc/perl/modperl/branches/1.x/Makefile.PL?view=diff&rev=524700&r1=524699&r2=524700
==============================================================================
--- perl/modperl/branches/1.x/Makefile.PL (original)
+++ perl/modperl/branches/1.x/Makefile.PL Sun Apr  1 16:04:52 2007
@@ -2315,7 +2315,10 @@
         elsif (/ADD CPP/) {
             my $apache_inc = win32_fix_path_dsp($win32_path{APACHE_INC});
             s!/I "\\Perl\\lib\\CORE"!/I "$apache_inc" /I "$apache_inc/../os/win32" /I "$perl_inc"!;
-            s!(/D "WIN32")!$1 /D "EAPI" ! if $win32_args{EAPI}; 
+            s!(/D "WIN32")!$1 /D "EAPI" ! if $win32_args{EAPI};
+            if ($] < 5.008006) {
+	        s!(/D "_MSWSOCK_")!/D "_WINSOCK2API_" $1!;
+	    }
             print NEWDSP $_;
         }
         else {