X-Git-Url: http://vcs.maemo.org/git/?a=blobdiff_plain;f=dev%2Farm%2Flibtest-pod-coverage-perl%2Flibtest-pod-coverage-perl-1.08%2Ft%2Fsimple.t;fp=dev%2Farm%2Flibtest-pod-coverage-perl%2Flibtest-pod-coverage-perl-1.08%2Ft%2Fsimple.t;h=ed01aed8498946ff406f8f95265b4c27bdc9e27d;hb=f477fa73365d491991707e7ed9217b48d6994551;hp=0000000000000000000000000000000000000000;hpb=da95c414033799c3a62606f299c3c00b5c77ca11;p=dh-make-perl diff --git a/dev/arm/libtest-pod-coverage-perl/libtest-pod-coverage-perl-1.08/t/simple.t b/dev/arm/libtest-pod-coverage-perl/libtest-pod-coverage-perl-1.08/t/simple.t new file mode 100644 index 0000000..ed01aed --- /dev/null +++ b/dev/arm/libtest-pod-coverage-perl/libtest-pod-coverage-perl-1.08/t/simple.t @@ -0,0 +1,21 @@ +#!perl -T + +use lib "t"; +use strict; +use Test::More tests=>4; +use Test::Builder::Tester; + +BEGIN { + use_ok( 'Test::Pod::Coverage' ); +} + +pod_coverage_ok( "Simple", "Simple is OK" ); + +# Now try it under T:B:T +test_out( "ok 1 - Simple is still OK" ); +pod_coverage_ok( "Simple", "Simple is still OK" ); +test_test( "Simple runs under T:B:T" ); + +test_out( "ok 1 - Pod coverage on Simple" ); +pod_coverage_ok( "Simple" ); +test_test( "Simple runs under T:B:T" );