Change 34329 by [EMAIL PROTECTED] on 2008/09/09 17:36:41

        Suck in r1147 from TH3's svn:
        Make test work if HARNESS_TIMER=1. Thanks Petdance.

Affected files ...

... //depot/perl/ext/Test/Harness/t/prove.t#4 edit

Differences ...

==== //depot/perl/ext/Test/Harness/t/prove.t#4 (text) ====
Index: perl/ext/Test/Harness/t/prove.t
--- perl/ext/Test/Harness/t/prove.t#3~34229~    2008-08-26 06:29:49.000000000 
-0700
+++ perl/ext/Test/Harness/t/prove.t     2008-09-09 10:36:41.000000000 -0700
@@ -1316,6 +1316,8 @@
     my $name = $test->{name};
     my $class = $test->{class} || 'FakeProve';
 
+    local $ENV{HARNESS_TIMER};
+
     ok my $app = $class->new( exists $test->{args} ? $test->{args} : () ),
       "$name: App::Prove created OK";
 
End of Patch.

Reply via email to