From: Peter Rabbitson <ribasushi@cpan.org>
Date: Tue, 1 Mar 2016 20:13:46 +0000 (+0100)
Subject: Ditch done_testing - less Test::More upgrade-churn
X-Git-Tag: 0.27~8
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=39bc2d6e65e2e1898be6219299f2e8a09e7a7b1c;p=p5sagit%2Fnamespace-clean.git

Ditch done_testing - less Test::More upgrade-churn
---

diff --git a/Makefile.PL b/Makefile.PL
index 411c9ef..39b7677 100644
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -31,7 +31,7 @@ my %META = (
     },
     test => {
       requires => {
-        'Test::More' => '0.88',
+        'Test::More' => '0.47',
       }
     },
   },
diff --git a/t/07-debugger.t b/t/07-debugger.t
index 9e72122..8155214 100644
--- a/t/07-debugger.t
+++ b/t/07-debugger.t
@@ -9,6 +9,9 @@ BEGIN {
   ) {
     plan skip_all => $missing_xs;
   }
+  else {
+    plan tests => 4;
+  }
 }
 
 BEGIN {
@@ -20,7 +23,7 @@ BEGIN {
 
 #line 1
 #!/usr/bin/perl -d
-#line 10
+#line 27
 
 }
 
@@ -42,5 +45,3 @@ ok( !Foo->can("foo"), "foo cleaned up" );
 ok( !Foo->can("baz"), "baz cleaned up" );
 
 Foo->bar();
-
-done_testing;
diff --git a/t/08-const-sub.t b/t/08-const-sub.t
index ec0d861..091052b 100644
--- a/t/08-const-sub.t
+++ b/t/08-const-sub.t
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-use Test::More 0.88;
+use Test::More tests => 2;
 
 use constant CONST => 123;
 use namespace::clean;
@@ -10,5 +10,3 @@ my $x = CONST;
 is $x, 123;
 
 ok eval("!defined(&CONST)");
-
-done_testing;
diff --git a/t/09-fiddle-hinthash.t b/t/09-fiddle-hinthash.t
index 6882db9..73ed65b 100644
--- a/t/09-fiddle-hinthash.t
+++ b/t/09-fiddle-hinthash.t
@@ -1,7 +1,7 @@
 use strict;
 use warnings;
 
-use Test::More 0.88;
+use Test::More tests => 4;
 
 {
   package Bar;
@@ -48,6 +48,3 @@ use Test::More 0.88;
     }
   }
 }
-
-
-done_testing;
diff --git a/t/10-pure-perl.t b/t/10-pure-perl.t
index 54dec9f..ed19cf6 100644
--- a/t/10-pure-perl.t
+++ b/t/10-pure-perl.t
@@ -17,6 +17,7 @@ BEGIN {
 
   $ENV{B_HOOKS_ENDOFSCOPE_IMPLEMENTATION} = 'PP';
   $ENV{PACKAGE_STASH_IMPLEMENTATION} = 'PP';
+  plan tests => 13;
 }
 
 use B::Hooks::EndOfScope 0.12;
@@ -69,5 +70,3 @@ for my $fn ( bsd_glob("t/*.t") ) {
   wait;
   ok (! $?, "Exit $? from: @cmd");
 }
-
-done_testing;