vcs.maemo.org Git - pkg-perl/blob - deb-src/libtest-pod-coverage-perl/libtest-pod-coverage-perl-1.08/t/nosymbols.t

   1 #!perl -T
   2
   3 use strict;
   4 use lib "t";
   5 use Test::More tests => 3;
   6 use Test::Builder::Tester;
   7
   8 BEGIN {
   9     use_ok( 'Test::Pod::Coverage' );
  10 }
  11
  12 NO_VERBOSE: {
  13     test_out( "ok 1 - Checking Nosymbols" );
  14     pod_coverage_ok( "Nosymbols", "Checking Nosymbols" );
  15     test_test( "Handles files with no symbols" );
  16 }
  17
  18 VERBOSE: {
  19     local $ENV{HARNESS_VERBOSE} = 1;
  20     test_out( "ok 1 - Checking Nosymbols" );
  21     test_diag( "Nosymbols: no public symbols defined" );
  22     pod_coverage_ok( "Nosymbols", "Checking Nosymbols" );
  23     test_test( "Handles files with no symbols" );
  24 }