git.maemo.org Git - pkg-perl/blob - deb-src/libtest-perl-critic-perl/libtest-perl-critic-perl-1.01/t/99_pod_coverage.t

   1 #######################################################################
   2 #      $URL: http://perlcritic.tigris.org/svn/perlcritic/tags/Test-Perl-Critic-1.01/t/99_pod_coverage.t $
   3 #     $Date: 2007-01-24 22:22:10 -0800 (Wed, 24 Jan 2007) $
   4 #   $Author: thaljef $
   5 # $Revision: 1183 $
   6 ########################################################################
   7
   8 use strict;
   9 use warnings;
  10 use Test::More;
  11
  12 eval 'use Test::Pod::Coverage 1.00';
  13 plan skip_all => 'Test::Pod::Coverage 1.00 requried to test POD' if $@;
  14 my $trustme = { trustme => [ qr{ \A (?: new | violations ) \z }x ] };
  15 all_pod_coverage_ok($trustme);