[PATCH] perl-5.10.x has Harnesss 3

[email protected] (Bram) Fri, 08 Aug 2008 19:29:29 +0200
Newsgroups perl.daily-build
Message-ID <[email protected]>
--=_419t28oapbwg
Content-Type: text/plain;
	charset=ISO-8859-1;
	DelSp="Yes";
	format="flowed"
Content-Disposition: inline
Content-Transfer-Encoding: 7bit

Attached patch sets 'hasharness3' if perl-5.10.x is being smoked and  
the current patch is higher then 33960.

Without this patch the failed tests aren't visible and the result  
FAIL(X) or PASS-so-far is generated instead of FAIL.

http://public.activestate.com/cgi-bin/perlbrowse/p/33961
Change 33961 by davem@davem-pigeon on 2008/05/31 14:30:09

	Integrate:
	[ 32659]
	Upgrade to Test::Harness 3.05
	Add test boilerplate to various test files.
	Add FIXME skips for various tests that don't play nicely with the
	altered layout in the core.
	lib/Test/Harness/t/unicode.t appears to fail under UTF-8 locales and
	so will need fixing.





--=_419t28oapbwg
Content-Type: text/x-patch;
	charset=ISO-8859-1;
	name="patch_5.10.x"
Content-Disposition: attachment;
	filename="patch_5.10.x"
Content-Transfer-Encoding: 7bit

diff -Naur old/lib/Test/Smoke.pm new/lib/Test/Smoke.pm
--- old/lib/Test/Smoke.pm	2008-05-18 13:20:51.000000000 +0200
+++ new/lib/Test/Smoke.pm	2008-08-08 18:18:37.000000000 +0200
@@ -134,6 +134,11 @@
     Test::Smoke::BuildCFG->config( dfopts => join " ", @df_buildopts );
 
     my $patch = Test::Smoke::Util::get_patch( $conf->{ddir} );
+    if ($conf->{perl_version} eq '5.10.x' and $patch >= 33961) {
+      # Test::Harness in perl-5.10.x was updated to Test::Harness 3 with Change 33961
+      # http://public.activestate.com/cgi-bin/perlbrowse/p/33961
+      $conf->{hasharness3} =  1;
+    }
 
     my $logfile = File::Spec->catfile( $conf->{ddir}, 'mktest.out' );
     my $BuildCFG = $continue 

--=_419t28oapbwg--