diff options
| author | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-27 19:20:45 +0000 |
|---|---|---|
| committer | Jarkko Hietaniemi <jhi@iki.fi> | 2003-07-27 19:20:45 +0000 |
| commit | 27caa5c10b08266a9617a2ffa79bff9b3e7a01ef (patch) | |
| tree | e98ec815db60aa1a21716539aba978bcfe14f909 /lib/Test/Harness.pm | |
| parent | 84a725ce7fe8d91d8384edf0aeea552b4d19c40e (diff) | |
| download | perl-27caa5c10b08266a9617a2ffa79bff9b3e7a01ef.tar.gz | |
Upgrade to Test::Harness 2.29.
p4raw-id: //depot/perl@20238
Diffstat (limited to 'lib/Test/Harness.pm')
| -rw-r--r-- | lib/Test/Harness.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/Test/Harness.pm b/lib/Test/Harness.pm index 609c23f325..cc1dd325e8 100644 --- a/lib/Test/Harness.pm +++ b/lib/Test/Harness.pm @@ -1,5 +1,5 @@ # -*- Mode: cperl; cperl-indent-level: 4 -*- -# $Id: Harness.pm,v 1.47 2003/04/24 19:33:05 andy Exp $ +# $Id: Harness.pm,v 1.52 2003/07/17 19:02:48 andy Exp $ package Test::Harness; @@ -22,7 +22,7 @@ use vars qw($VERSION $Verbose $Switches $Have_Devel_Corestack $Curtest $Have_Devel_Corestack = 0; -$VERSION = '2.28'; +$VERSION = '2.29'; $ENV{HARNESS_ACTIVE} = 1; @@ -898,7 +898,7 @@ sub _create_fmts { } } -sub canonfailed ($@) { +sub canonfailed ($$@) { my($max,$skipped,@failed) = @_; my %seen; @failed = sort {$a <=> $b} grep !$seen{$_}++, @failed; |