From 370a6b39880bb79d0ec7ed3b4e7a775c01b90a5c Mon Sep 17 00:00:00 2001
From: lecoanet
Date: Tue, 17 May 2005 14:59:19 +0000
Subject: Fix a showstopper in Mapefile.PL related to test handling

---
 Perl/Makefile.PL | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'Perl')

diff --git a/Perl/Makefile.PL b/Perl/Makefile.PL
index ebcd5ec..5db6713 100644
--- a/Perl/Makefile.PL
+++ b/Perl/Makefile.PL
@@ -56,19 +56,21 @@ unless ($WIN) {
 #For some reason which the author of ExtUtils::MM_Unix forget, Unix machines like to have
 #PERL_DL_NONLAZY set for tests. This is FALSE for TkZinc.
 
-sub ExtUtils::MM_Unix::test_via_harness {
+if ($] >= 5.008000) {
+  $ExtUtils::MM_Unix::test_via_harness = sub {
     my($self, $perl, $tests) = @_;
 #    return $self->SUPER::test_via_harness("PERL_DL_NONLAZY=1 $perl", $tests);
     # I should use the SUPER method, but this needs some import tunning...
     return ExtUtils::MM_Any::test_via_harness($self, $perl, $tests);
-}
+  };
 
 #Again, the PERL_DL_NONLAZY thing.
-sub ExtUtils::MM_Unix::test_via_script {
+  $ExtUtils::MM_Unix::test_via_script = sub {
     my($self, $perl, $script) = @_;
 #    return $self->SUPER::test_via_script("PERL_DL_NONLAZY=1 $perl", $script);
     # I should use the SUPER method, but this needs some import tunning...
     return ExtUtils::MM_Any::test_via_script($self, $perl, $script);
+  };
 }
 
 # See lib/ExtUtils/MakeMaker.pm for details of how to influence
-- 
cgit v1.1