t/92-pod-coverage.t

   1 #!perl -T
   2
   3 use strict;
   4 use warnings;
   5 use Test::More;
   6
   7 # Ensure a recent version of Test::Pod::Coverage
   8 my $min_tpc = 1.08;
   9 eval "use Test::Pod::Coverage $min_tpc";
  10 plan skip_all => "Test::Pod::Coverage $min_tpc required for testing POD coverage" if $@;
  11
  12 # Test::Pod::Coverage doesn't require a minimum Pod::Coverage version,
  13 # but older versions don't recognize some common documentation styles
  14 my $min_pc = 0.18;
  15 eval "use Pod::Coverage $min_pc";
  16 plan skip_all => "Pod::Coverage $min_pc required for testing POD coverage" if $@;
  17
  18 plan tests => 34;
  19
  20 my $moose_private = { also_private => [ qr/^BUILD$/, qr/^DEMOLISH$/ ] };
  21
  22 # First load the interface so that no keywords are registered.
  23 pod_coverage_ok( 'LaTeX::TikZ::Interface' );
  24
  25 pod_coverage_ok( 'LaTeX::TikZ' );
  26 pod_coverage_ok( 'LaTeX::TikZ::Formatter' );
  27 pod_coverage_ok( 'LaTeX::TikZ::Functor' );
  28 pod_coverage_ok( 'LaTeX::TikZ::Functor::Rule' );
  29 pod_coverage_ok( 'LaTeX::TikZ::Meta::TypeConstraint::Autocoerce' );
  30 pod_coverage_ok( 'LaTeX::TikZ::Mod' );
  31 pod_coverage_ok( 'LaTeX::TikZ::Mod::Clip' );
  32 pod_coverage_ok( 'LaTeX::TikZ::Mod::Color' );
  33 pod_coverage_ok( 'LaTeX::TikZ::Mod::Fill' );
  34 pod_coverage_ok( 'LaTeX::TikZ::Mod::Formatted' );
  35 pod_coverage_ok( 'LaTeX::TikZ::Mod::Layer', $moose_private);
  36 pod_coverage_ok( 'LaTeX::TikZ::Mod::Pattern' );
  37 pod_coverage_ok( 'LaTeX::TikZ::Mod::Pattern::Dots' );
  38 pod_coverage_ok( 'LaTeX::TikZ::Mod::Pattern::Lines' );
  39 pod_coverage_ok( 'LaTeX::TikZ::Mod::Raw' );
  40 pod_coverage_ok( 'LaTeX::TikZ::Mod::Width' );
  41 pod_coverage_ok( 'LaTeX::TikZ::Point' );
  42 pod_coverage_ok( 'LaTeX::TikZ::Point::Math::Complex' );
  43 pod_coverage_ok( 'LaTeX::TikZ::Scope' );
  44 pod_coverage_ok( 'LaTeX::TikZ::Set' );
  45 pod_coverage_ok( 'LaTeX::TikZ::Set::Arc' );
  46 pod_coverage_ok( 'LaTeX::TikZ::Set::Arrow' );
  47 pod_coverage_ok( 'LaTeX::TikZ::Set::Circle' );
  48 pod_coverage_ok( 'LaTeX::TikZ::Set::Line' );
  49 pod_coverage_ok( 'LaTeX::TikZ::Set::Mutable' );
  50 pod_coverage_ok( 'LaTeX::TikZ::Set::Path' );
  51 pod_coverage_ok( 'LaTeX::TikZ::Set::Point' );
  52 pod_coverage_ok( 'LaTeX::TikZ::Set::Polyline' );
  53 pod_coverage_ok( 'LaTeX::TikZ::Set::Raw' );
  54 pod_coverage_ok( 'LaTeX::TikZ::Set::Rectangle' );
  55 pod_coverage_ok( 'LaTeX::TikZ::Set::Sequence' );
  56 pod_coverage_ok( 'LaTeX::TikZ::Set::Union' );
  57 pod_coverage_ok( 'LaTeX::TikZ::Tools' );