Upgrade to Test::Simple 0.60

[p5sagit/p5-mst-13.2.git] / lib / Test / Simple / t / has_plan2.t

diff --git a/lib/Test/Simple/t/has_plan2.t b/lib/Test/Simple/t/has_plan2.t
index 2b9ac49..33e0923 100644 (file)
--- a/lib/Test/Simple/t/has_plan2.t
+++ b/lib/Test/Simple/t/has_plan2.t
@@ -19,12 +19,16 @@ BEGIN {
     require Test::Harness;
 }
 
-if( $Test::Harness::VERSION < 1.20 ) {
-    plan skip_all => 'Need Test::Harness 1.20 or up';
+# This feature requires a fairly new version of Test::Harness
+if( $Test::Harness::VERSION < 2.03 ) {
+    plan tests => 1;
+    diag "Need Test::Harness 2.03 or up.  You have $Test::Harness::VERSION.";
+    fail 'Need Test::Harness 2.03 or up';
+    exit;
 }
 
 use strict;
 use Test::Builder;
 
 plan 'no_plan';
-is(Test::Builder->has_plan, 'no_plan', 'has no_plan');
+is(Test::Builder->new->has_plan, 'no_plan', 'has no_plan');