From cd1cddcc18af8024f7804a0b2fd50ace0b8f0abe Mon Sep 17 00:00:00 2001
From: mertz
Date: Tue, 17 May 2005 10:58:36 +0000
Subject: - redefinning ExtUtils::MM_Unix::test_via_harness and
 ExtUtils::MM_Unix::test_via_script to avoid PERL_DL_NONLAZY=1 during the
 test. This absolutely necessary to test properly Tkzinc before installation

I hope this does not broke the process in some unforeseen cases.
PS: the author did not document the reason why I set the PERL_DL_NONLAZY
to 1.

---
 Perl/Makefile.PL | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)

(limited to 'Perl')

diff --git a/Perl/Makefile.PL b/Perl/Makefile.PL
index d731648..ebcd5ec 100644
--- a/Perl/Makefile.PL
+++ b/Perl/Makefile.PL
@@ -53,6 +53,24 @@ unless ($WIN) {
   $INC .= " -I/usr/X11R6/include";
 }
 
+#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 {
+    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 {
+    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
 # the contents of the Makefile that is written.
 WriteMakefile(
-- 
cgit v1.1