From: Marcus Holland-Moritz <mhx-perl@gmx.net>
Date: Mon, 3 Nov 2003 20:53:33 +0000 (+0100)
Subject: Re: PERL_VERSION, SUBVERSION, PATCHLEVEL
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=2a5407e4bc6bda1411e5f9fc8e1b8a13425937d2;p=p5sagit%2Fp5-mst-13.2.git

Re: PERL_VERSION, SUBVERSION, PATCHLEVEL
From: "Marcus Holland-Moritz" <mhx-perl@gmx.net>
Message-ID: <023a01c3a244$2a1dd5a0$0c2f1fac@R2D2>

p4raw-id: //depot/perl@21647
---

diff --git a/ext/Devel/PPPort/PPPort.pm b/ext/Devel/PPPort/PPPort.pm
index 23f43a2..adc4c6a 100644
--- a/ext/Devel/PPPort/PPPort.pm
+++ b/ext/Devel/PPPort/PPPort.pm
@@ -159,7 +159,7 @@ require DynaLoader;
 use strict;
 use vars qw( $VERSION @ISA @EXPORT @EXPORT_OK $data );
 
-$VERSION = "2.009";
+$VERSION = "2.010";
 
 @ISA = qw(Exporter DynaLoader);
 @EXPORT =  qw();
@@ -366,9 +366,10 @@ __DATA__
 
 #ifndef PERL_REVISION
 #   ifndef __PATCHLEVEL_H_INCLUDED__
+#       define PERL_PATCHLEVEL_H_IMPLICIT
 #       include <patchlevel.h>
 #   endif
-#   if !(defined(PERL_VERSION) || (SUBVERSION > 0 && defined(PATCHLEVEL)))
+#   if !(defined(PERL_VERSION) || (defined(SUBVERSION) && defined(PATCHLEVEL)))
 #       include <could_not_find_Perl_patchlevel.h>
 #   endif
 #   ifndef PERL_REVISION