Blob Blame History Raw
diff -up Software-License-0.103001/t/custom.t.orig Software-License-0.103001/t/custom.t
--- Software-License-0.103001/t/custom.t.orig	2011-04-28 12:20:57.000000000 +0100
+++ Software-License-0.103001/t/custom.t	2011-04-28 15:41:09.821742581 +0100
@@ -2,7 +2,7 @@
 use strict;
 use warnings;
 
-use Test::More;
+use Test::More tests => 8;
 
 use Software::License::Custom;
 
@@ -40,5 +40,3 @@ Well... this is only some sample text. I
 
 Yes, spanning more lines and more paragraphs.
 END_OF_FULLTEXT
-
-done_testing;
diff -up Software-License-0.103001/t/meta-names.t.orig Software-License-0.103001/t/meta-names.t
--- Software-License-0.103001/t/meta-names.t.orig	2011-04-28 12:20:57.000000000 +0100
+++ Software-License-0.103001/t/meta-names.t	2011-04-28 15:40:17.974704365 +0100
@@ -2,13 +2,16 @@
 use strict;
 use warnings;
 
-use Test::More 0.88;
+use Test::More;
 
 my @files = <lib/Software/License/*.pm>;
 
+plan tests => scalar @files;
+
 for my $module (@files) {
   # It's retired.  Dunno if it's okay to be open_source.  Punt!
-  next if $module =~ /Sun.pm$/;
+  SKIP: {
+  skip "Dunno if it's okay for Sun.pm to be open_source", 1 if $module =~ /Sun.pm$/;
 
   my $pkg = $module;
   $pkg =~ s{^lib/}{};
@@ -18,6 +21,5 @@ for my $module (@files) {
   eval "require $pkg; 1";
 
   ok(defined $pkg->meta_name, "$pkg provide meta_name");
+  }
 }
-
-done_testing;