diff options
author | Guillaume Rousse <guillomovitch@mageia.org> | 2012-12-05 12:19:52 +0000 |
---|---|---|
committer | Guillaume Rousse <guillomovitch@mageia.org> | 2012-12-05 12:19:52 +0000 |
commit | 781cfb9ad5b69f9f26346d0243dbcc62cb3168b4 (patch) | |
tree | aeb295a143a3244ce7c1c8f064d6a4c6f12e3d5b | |
parent | 79e8257902841be265fdad43ae737ef76ac57e96 (diff) | |
download | urpmi-781cfb9ad5b69f9f26346d0243dbcc62cb3168b4.tar urpmi-781cfb9ad5b69f9f26346d0243dbcc62cb3168b4.tar.gz urpmi-781cfb9ad5b69f9f26346d0243dbcc62cb3168b4.tar.bz2 urpmi-781cfb9ad5b69f9f26346d0243dbcc62cb3168b4.tar.xz urpmi-781cfb9ad5b69f9f26346d0243dbcc62cb3168b4.zip |
initial import
-rwxr-xr-x | t/05pod-coverage.t | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/t/05pod-coverage.t b/t/05pod-coverage.t new file mode 100755 index 00000000..c6444cf6 --- /dev/null +++ b/t/05pod-coverage.t @@ -0,0 +1,27 @@ +#!/usr/bin/perl + +use strict; +use warnings; +use lib 'urpm'; + +use English qw(-no_match_vars); +use Test::More; + +plan(skip_all => 'Author test, set $ENV{TEST_AUTHOR} to a true value to run') + if !$ENV{TEST_AUTHOR}; + +eval { + require Test::Pod::Coverage; + Test::Pod::Coverage->import(); +}; +plan(skip_all => 'Test::Pod::Coverage required') if $EVAL_ERROR; + +my @modules = all_modules('urpm'); + +plan tests => scalar @modules; + +foreach my $module (@modules) { + pod_coverage_ok( + $module, + ); +} |