Sophie

Sophie

distrib > Fedora > 15 > i386 > by-pkgid > 1900de4a87d761c291c89eaa7643d8d4 > files > 1

perl-Test-Mojibake-0.3-3.fc15.src.rpm

--- Test-Mojibake-0.3/t/06-pp-vs-xs.t
+++ Test-Mojibake-0.3/t/06-pp-vs-xs.t
@@ -1,7 +1,7 @@
 #!perl -T
 use strict;
 
-use Test::More;
+use Test::More 'no_plan';
 
 BEGIN {
     use_ok('Benchmark', 'countit');
@@ -10,7 +10,6 @@
 
 unless ($Test::Mojibake::use_xs) {
     diag('No XS module detected, will fallback to PP implementation!');
-    done_testing(2);
     exit;
 }
 
@@ -33,8 +32,6 @@
 
 diag(sprintf('XS/PP speed ratio is %0.2f', $t0->iters / $t1->iters));
 
-done_testing(7);
-
 sub run {
     my $i = 0;
     for (@buf) {
--- Test-Mojibake-0.3/t/release-cpan-changes.t
+++ Test-Mojibake-0.3/t/release-cpan-changes.t
@@ -1,15 +1,11 @@
 #!perl
 
+use Test::More;
+
 BEGIN {
-  unless ($ENV{RELEASE_TESTING}) {
-    require Test::More;
-    Test::More::plan(skip_all => 'these tests are for release candidate testing');
-  }
+  plan skip_all => 'these tests are for release candidate testing' unless ($ENV{RELEASE_TESTING});
+  eval 'use Test::CPAN::Changes';
+  plan skip_all => 'Test::CPAN::Changes required for this test' if $@;
 }
 
-
-use Test::More;
-eval 'use Test::CPAN::Changes';
-plan skip_all => 'Test::CPAN::Changes required for this test' if $@;
 changes_ok();
-done_testing();