From a3bf621f36e93c14b1d9e7c57c2ce75d1a8b29d4 Mon Sep 17 00:00:00 2001
From: Jarkko Hietaniemi <jhi@iki.fi>
Date: Sat, 15 Feb 2003 08:16:26 +0000
Subject: Make the patchlevel.h inclusion attempt pre-5.6.0-safe(r) (problem
 noticed by Graham with List::Util).

p4raw-id: //depot/perl@18709
---
 ext/Digest/MD5/MD5.xs | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'ext/Digest')

diff --git a/ext/Digest/MD5/MD5.xs b/ext/Digest/MD5/MD5.xs
index b1f2a04cdf..f70acbb8fa 100644
--- a/ext/Digest/MD5/MD5.xs
+++ b/ext/Digest/MD5/MD5.xs
@@ -44,10 +44,13 @@ extern "C" {
 }
 #endif
 
-#include <patchlevel.h>
-#ifndef PERL_VERSION
-#    include <could_not_find_Perl_patchlevel.h>
+#ifndef PATCHLEVEL
+#    include <patchlevel.h>
+#    if !(defined(PERL_VERSION) || (SUBVERSION > 0 && defined(PATCHLEVEL)))
+#        include <could_not_find_Perl_patchlevel.h>
+#    endif
 #endif
+
 #if PATCHLEVEL <= 4 && !defined(PL_dowarn)
    #define PL_dowarn dowarn
 #endif
-- 
cgit v1.2.1