diff -up namespace-clean-0.22/t/07-debugger.t.orig namespace-clean-0.22/t/07-debugger.t --- namespace-clean-0.22/t/07-debugger.t.orig 2011-12-21 09:50:20.000000000 +0000 +++ namespace-clean-0.22/t/07-debugger.t 2011-12-27 12:15:04.039679744 +0000 @@ -17,6 +17,8 @@ BEGIN { } +plan tests => 4; + { package Foo; @@ -35,5 +37,3 @@ ok( !Foo->can("foo"), "foo cleaned up" ) ok( !Foo->can("baz"), "baz cleaned up" ); Foo->bar(); - -done_testing; diff -up namespace-clean-0.22/t/08-const-sub.t.orig namespace-clean-0.22/t/08-const-sub.t --- namespace-clean-0.22/t/08-const-sub.t.orig 2011-03-29 22:44:20.000000000 +0100 +++ namespace-clean-0.22/t/08-const-sub.t 2011-12-27 12:15:04.052679751 +0000 @@ -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 -up namespace-clean-0.22/t/09-fiddle-hinthash.t.orig namespace-clean-0.22/t/09-fiddle-hinthash.t --- namespace-clean-0.22/t/09-fiddle-hinthash.t.orig 2011-12-22 11:07:06.000000000 +0000 +++ namespace-clean-0.22/t/09-fiddle-hinthash.t 2011-12-27 12:15:43.780700500 +0000 @@ -1,7 +1,7 @@ use strict; use warnings; -use Test::More 0.88; +use Test::More tests => 4; { package Bar; @@ -49,5 +49,3 @@ use Test::More 0.88; } } - -done_testing; diff -up namespace-clean-0.22/t/10-pure-perl.t.orig namespace-clean-0.22/t/10-pure-perl.t --- namespace-clean-0.22/t/10-pure-perl.t.orig 2011-12-22 11:20:21.000000000 +0000 +++ namespace-clean-0.22/t/10-pure-perl.t 2011-12-27 12:16:46.394733202 +0000 @@ -8,6 +8,8 @@ plan skip_all => "PP tests already execu eval { require B::Hooks::EndOfScope } or plan skip_all => "PP tests already executed"; +plan tests => 11; + # the PP tests will run either wih D::H (mainly on smokers) # or by setting the envvar (for users) my $has_d_h = eval { require Devel::Hide }; @@ -45,5 +47,3 @@ for my $fn (glob("$Bin/*.t")) { wait; ok (! $?, "Exit $? from: @cmd"); } - -done_testing;