PERL_DL_NONLAZY=1 /usr/local/bin/perl -Iblib/arch -Iblib/lib -e 'use Test::Harness 
qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t
    t/ExtUtils....ok                                                      
    All tests successful.
    Files=1, Tests=27,  8 wallclock secs ( 6.20 cusr +  1.24 csys =  7.44 CPU)


Any particularly good reason we're showing all that "PERL_DL_NONLAZY"
noise as part of "make test"?  What about just:

    Running tests for ExtUtils::MakeMaker
    t/ExtUtils....ok                                                        
    All tests successful.
    Files=1, Tests=27,  7 wallclock secs ( 5.93 cusr +  1.15 csys =  7.08 CPU)


--- lib/ExtUtils/MM_Unix.pm     2001/10/02 20:33:12     1.1
+++ lib/ExtUtils/MM_Unix.pm     2001/10/02 20:33:47
@@ -3463,7 +3463,8 @@
 sub test_via_harness {
     my($self, $perl, $tests) = @_;
     $perl = "PERL_DL_NONLAZY=1 $perl" unless $Is_Win32;
-    "\t$perl".q! $(TEST_LIBS) -e 'use Test::Harness qw(&runtests $$verbose); 
$$verbose=$(TEST_VERBOSE); runtests @ARGV;' !."$tests\n";
+    "\t$self->{NOECHO}echo Running tests for \$(NAME)\n".
+    "\t$self->{NOECHO}$perl".q! $(TEST_LIBS) -e 'use Test::Harness qw(&runtests 
+$$verbose); $$verbose=$(TEST_VERBOSE); runtests @ARGV;' !."$tests\n";
 }
 
 =item test_via_script (o)
@@ -3475,6 +3476,7 @@
 sub test_via_script {
     my($self, $perl, $script) = @_;
     $perl = "PERL_DL_NONLAZY=1 $perl" unless $Is_Win32;
+    "\t$self->{NOECHO}echo Running tests for \$(NAME)\n".
     qq{\t$perl}.q{ $(TEST_LIBS) }.qq{$script
 };
 }


-- 

Michael G. Schwern   <[EMAIL PROTECTED]>    http://www.pobox.com/~schwern/
Perl6 Quality Assurance     <[EMAIL PROTECTED]>       Kwalitee Is Job One
Here's hoping you don't harbor a death wish!

Reply via email to