X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=t%2F92-pod-coverage.t;h=50f22e625fa66568b430ae8234e36dc289c9a75c;hb=87a3e007a8e9af9c96547ec16393f2fb41236421;hp=8aa1ace070fd6ac9607b7b0b549ce11c660f363f;hpb=67d7b560467f2d6b762eeee33aa07e0dba290f2b;p=perl%2Fmodules%2FTest-Leaner.git

diff --git a/t/92-pod-coverage.t b/t/92-pod-coverage.t
index 8aa1ace..50f22e6 100644
--- a/t/92-pod-coverage.t
+++ b/t/92-pod-coverage.t
@@ -1,23 +1,22 @@
+#!perl -T
+
 use strict;
 use warnings;
+
 use Test::More;
 
-# Ensure a recent version of Test::Pod::Coverage
-my $min_tpc = 1.08;
-eval "use Test::Pod::Coverage $min_tpc";
-plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage" if $@;
+use lib 't/lib';
+use VPIT::TestHelpers;
+
+load_or_skip_all('Test::Pod::Coverage', '1.08', [ ]);
+load_or_skip_all('Pod::Coverage',       '0.18'     );
 
-# Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
-# but older versions don't recognize some common documentation styles
-my $min_pc = 0.18;
-eval "use Pod::Coverage $min_pc";
-plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage" if $@;
+eval 'use Test::Pod::Coverage'; # Make Kwalitee test happy
 
 all_pod_coverage_ok({
  also_private => [ qw<
   NO_PLAN
   SKIP_ALL
-  THREADSAFE
   carp
   croak
   is_like