r39698 - in /branches/upstream/libtest-checkmanifest-perl: ./ current/ current/lib/ current/lib/Test/ current/t/
ryan52-guest at users.alioth.debian.org
ryan52-guest at users.alioth.debian.org
Sat Jul 11 04:33:57 UTC 2009
Author: ryan52-guest
Date: Sat Jul 11 04:33:50 2009
New Revision: 39698
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=39698
Log:
[svn-inject] Installing original source of libtest-checkmanifest-perl
Added:
branches/upstream/libtest-checkmanifest-perl/
branches/upstream/libtest-checkmanifest-perl/current/
branches/upstream/libtest-checkmanifest-perl/current/Changes (with props)
branches/upstream/libtest-checkmanifest-perl/current/MANIFEST (with props)
branches/upstream/libtest-checkmanifest-perl/current/META.yml (with props)
branches/upstream/libtest-checkmanifest-perl/current/Makefile.PL (with props)
branches/upstream/libtest-checkmanifest-perl/current/README (with props)
branches/upstream/libtest-checkmanifest-perl/current/lib/
branches/upstream/libtest-checkmanifest-perl/current/lib/Test/
branches/upstream/libtest-checkmanifest-perl/current/lib/Test/CheckManifest.pm (with props)
branches/upstream/libtest-checkmanifest-perl/current/t/
branches/upstream/libtest-checkmanifest-perl/current/t/00_load.t (with props)
branches/upstream/libtest-checkmanifest-perl/current/t/01_selftest.t (with props)
branches/upstream/libtest-checkmanifest-perl/current/t/98_boilerplate.t (with props)
branches/upstream/libtest-checkmanifest-perl/current/t/99_pod.t (with props)
branches/upstream/libtest-checkmanifest-perl/current/t/99_pod_coverage.t (with props)
Added: branches/upstream/libtest-checkmanifest-perl/current/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/Changes?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/Changes (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/Changes Sat Jul 11 04:33:50 2009
@@ -1,0 +1,51 @@
+Revision history for Perl extension Test::CheckManifest.
+
+0.1 Fri Sep 29 09:18:09 2006
+ - original version; created by h2xs 1.23 with options
+ -XA -n Test::CheckManifest
+ + added tests for Pod coverage, Pod, Manifest
+
+0.2
+ - bugfix: some files excluded from test
+
+0.3 Wed Oct 18 21:36:32
+ - bugfix: CheckManifest works under Solaris now
+
+0.4 Thu Oct 19 10:47:27
+ - bugfix: handles different newlines (mac, win, *nix)
+
+0.5 Sat Nov 18 18:00:00
+ - bugfix: T::CM now works under taint mode (http://rt.cpan.org/Public/Bug/Display.html?id=22927)
+ + added : ok_manifest accepts hashref where specific dirs can be excluded
+ from test
+
+0.6 Tue Nov 21 22:22:22 2006
+ Test scripts improved
+
+0.7 Thu Nov 23 12:58:54 2006
+ + added: "filter" to exclude files that match on specific regexp from test
+ (http://rt.cpan.org/Public/Bug/Display.html?id=23529)
+ + added: "bool" to combine "filter" and "exclude"
+ + added: boilerplate.t
+
+0.8 Fri Nov 24 09:17:10 2006
+ + added: T::CM now tests also on files that are not part of the distro but named in the MANIFEST
+
+0.9 Mon Nov 27 09:35:26 2006
+ - bugfix: ok_manifest files without blib (http://rt.cpan.org/Public/Bug/Display.html?id=23580)
+ - bugfix: Test-CheckManifest.t -- added ':' in character group (untaint $home)
+ - bugfix: 99_pod_coverage.t -- removed all_modules and now T::P::C 1.08 or higher is required
+ - bugfix: ref $_ --> ref($_)
+ - bugfix: "filter" to exclude files that match on specific regexp from test
+ (http://rt.cpan.org/Public/Bug/Display.html?id=23529)
+ + added: 00_load.t
+
+1.0 Wed Dec 27 12:15:39 2006
+ - bugfix: ok_manifest excludes files created by Module::Build
+
+1.01 Sat Dec 29 00:28:13 2007
+ - fixes in test scripts
+ - require 5.006001
+ - allow more characters in path
+ + added license to Makefile.PL
+ + changed META.yml
Propchange: branches/upstream/libtest-checkmanifest-perl/current/Changes
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/MANIFEST?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/MANIFEST (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/MANIFEST Sat Jul 11 04:33:50 2009
@@ -1,0 +1,11 @@
+Changes
+Makefile.PL
+MANIFEST
+README
+t/00_load.t
+t/01_selftest.t
+t/98_boilerplate.t
+t/99_pod.t
+t/99_pod_coverage.t
+lib/Test/CheckManifest.pm
+META.yml Module meta-data (added by MakeMaker)
Propchange: branches/upstream/libtest-checkmanifest-perl/current/MANIFEST
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/META.yml?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/META.yml (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/META.yml Sat Jul 11 04:33:50 2009
@@ -1,0 +1,16 @@
+# http://module-build.sourceforge.net/META-spec.html
+#XXXXXXX This is a prototype!!! It will change in the future!!! XXXXX#
+name: Test-CheckManifest
+version: 1.01
+version_from: lib/Test/CheckManifest.pm
+installdirs: site
+requires:
+ Carp: 0
+ Cwd: 0
+ File::Basename: 0
+ File::Find: 0
+ File::Spec: 0
+ Test::Builder: 0
+
+distribution_type: module
+generated_by: ExtUtils::MakeMaker version 6.30_01
Propchange: branches/upstream/libtest-checkmanifest-perl/current/META.yml
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/Makefile.PL
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/Makefile.PL?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/Makefile.PL (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/Makefile.PL Sat Jul 11 04:33:50 2009
@@ -1,0 +1,22 @@
+require 5.006001;
+
+use ExtUtils::MakeMaker;
+# See lib/ExtUtils/MakeMaker.pm for details of how to influence
+# the contents of the Makefile that is written.
+WriteMakefile(
+ NAME => 'Test::CheckManifest',
+ VERSION_FROM => 'lib/Test/CheckManifest.pm', # finds $VERSION
+ PREREQ_PM => {
+ Test::Builder => 0,
+ File::Spec => 0,
+ File::Basename => 0,
+ File::Find => 0,
+ Cwd => 0,
+ Carp => 0,
+ }, # e.g., Module::Name => 1.1
+ ($] >= 5.005 ? ## Add these new keywords supported since 5.005
+ (ABSTRACT_FROM => 'lib/Test/CheckManifest.pm', # retrieve abstract from module
+ AUTHOR => 'Renee Baecker <module at renee-baecker.de>') : ()),
+ ($ExtUtils::MakeMaker::VERSION >= 6.31 ?
+ (LICENSE => 'perl') : ()),
+);
Propchange: branches/upstream/libtest-checkmanifest-perl/current/Makefile.PL
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/README
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/README?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/README (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/README Sat Jul 11 04:33:50 2009
@@ -1,0 +1,31 @@
+Test-CheckManifest
+==================
+
+The MANIFEST file is one critical point of each module on CPAN. Many programmers
+(including myself) add new testscripts or new files to the distribution. But then
+these files are not added to the MANIFEST.
+
+This can cause problems during installation process.
+
+This module aims to help the programmer to keep the MANIFEST file up to date.
+
+INSTALLATION
+
+To install this module type the following:
+
+ perl Makefile.PL
+ make
+ make test
+ make install
+
+COPYRIGHT AND LICENCE
+
+Put the correct copyright and licence information here.
+
+Copyright (C) 2006 by Renee Baecker
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself, either Perl version 5.8.6 or,
+at your option, any later version of Perl 5 you may have available.
+
+
Propchange: branches/upstream/libtest-checkmanifest-perl/current/README
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/lib/Test/CheckManifest.pm
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/lib/Test/CheckManifest.pm?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/lib/Test/CheckManifest.pm (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/lib/Test/CheckManifest.pm Sat Jul 11 04:33:50 2009
@@ -1,0 +1,261 @@
+package Test::CheckManifest;
+
+use strict;
+use warnings;
+
+use Cwd;
+use Carp;
+use File::Spec;
+use File::Basename;
+use Test::Builder;
+use File::Find;
+
+our $VERSION = '1.01';
+
+my $test = Test::Builder->new();
+my $test_bool = 1;
+my $plan = 0;
+my $counter = 0;
+
+sub import {
+ my $self = shift;
+ my $caller = caller;
+ my %plan = @_;
+
+ for my $func ( qw( ok_manifest ) ) {
+ no strict 'refs';
+ *{$caller."::".$func} = \&$func;
+ }
+
+ $test->exported_to($caller);
+ $test->plan(%plan);
+
+ $plan = 1 if(exists $plan{tests});
+}
+
+sub ok_manifest{
+ my ($hashref,$msg) = @_;
+
+ $test->plan(tests => 1) unless $plan;
+
+ my $is_hashref = 1;
+ $is_hashref = 0 unless ref($hashref);
+
+ $msg = $hashref unless $is_hashref;
+
+ my $bool = 1;
+ my $dir =
+ my $home = Cwd::realpath(dirname(File::Spec->rel2abs($0)) . '/..');
+ my $manifest = Cwd::realpath($home . '/MANIFEST');
+
+ my @missing_files = ();
+ my @files_plus = ();
+ my $arref = ['/blib' , '/_build'];
+ my $filter = $is_hashref &&
+ $hashref->{filter} ? $hashref->{filter} : [];
+ my $comb = $is_hashref &&
+ $hashref->{bool} &&
+ $hashref->{bool} =~ m/^and$/i ?
+ 'and' :
+ 'or';
+
+ push @$arref, @{$hashref->{exclude}} if($is_hashref and
+ exists $hashref->{exclude} and
+ ref($hashref->{exclude}) eq 'ARRAY');
+
+ for(@$arref){
+ croak 'path in excluded array must be "absolute"' unless m!^/!;
+ my $path = $home . $_;
+ next unless -e $path;
+ $_ = Cwd::realpath($path);
+ }
+
+ @$arref = grep { defined }@$arref;
+
+ unless( open(my $fh,'<',$manifest) ){
+ $bool = 0;
+ $msg = "can't open $manifest";
+ }
+ else{
+ my @files = grep{!/^\s*$/ and !/^META\.yml/}<$fh>;
+ close $fh;
+
+ chomp @files;
+
+ {
+ local $/ = "\r";
+ chomp @files;
+ }
+
+ for my $tfile(@files){
+ $tfile = (split(/\s{2,}/,$tfile,2))[0];
+ next unless -e $home . '/' . $tfile;
+ $tfile = Cwd::realpath($home . '/' . $tfile);
+ }
+
+ my (@dir_files,%files_hash,%excluded);
+ @files_hash{@files} = ();
+
+ find({no_chdir => 1,
+ wanted => sub{ my $file = $File::Find::name;
+ my $is_excluded = _is_excluded($file,$arref,$filter,$comb);
+ push(@dir_files,Cwd::realpath($file)) if -f $file and !$is_excluded;
+ $excluded{$file} = 1 if -f $file and $is_excluded}},$home);
+
+
+ #print STDERR ">>",++$counter,":",Dumper(\@files,\@dir_files);
+ CHECK: for my $file(@dir_files){
+ for my $check(@files){
+ if($file eq $check){
+ delete $files_hash{$check};
+ next CHECK;
+ }
+ }
+ push(@missing_files,$file);
+ $bool = 0;
+ }
+
+ delete $files_hash{$_} for keys %excluded;
+ @files_plus = keys %files_hash;
+ $bool = 0 if scalar @files_plus > 0;
+ }
+
+ my $diag = 'The following files are not named in the MANIFEST file: '.
+ join(', ', at missing_files);
+ my $plus = 'The following files are not part of distro but named in the MANIFEST file: '.
+ join(', ', at files_plus);
+
+ $test->is_num($test_bool,$bool,$msg);
+ $test->diag($diag) if scalar @missing_files >= 1 and $test_bool == 1;
+ $test->diag($plus) if scalar @files_plus >= 1 and $test_bool == 1;
+}
+
+sub _not_ok_manifest{
+ $test_bool = 0;
+ ok_manifest(@_);
+ $test_bool = 1;
+}
+
+sub _is_excluded{
+ my ($file,$dirref,$filter,$bool) = @_;
+ my @excluded_files = qw(pm_to_blib Makefile META.yml Build pod2htmd.tmp
+ pod2htmi.tmp Build.bat .cvsignore);
+
+ my @matches = grep{$file =~ /$_$/}@excluded_files;
+
+ if($bool eq 'or'){
+ push @matches, $file if grep{ref($_) and ref($_) eq 'Regexp' and $file =~ /$_/}@$filter;
+ push @matches, $file if grep{$file =~ /^\Q$_\E/}@$dirref;
+ }
+ else{
+ if(grep{$file =~ /$_/ and ref($_) and ref($_) eq 'Regexp'}@$filter and
+ grep{$file =~ /^\Q$_\E/ and not ref($_)}@$dirref){
+ push @matches, $file;
+ }
+ }
+
+ return scalar @matches;
+}
+
+1;
+__END__
+
+=head1 NAME
+
+Test::CheckManifest - Check if your Manifest matches your distro
+
+=head1 SYNOPSIS
+
+ use Test::CheckManifest;
+ ok_manifest();
+
+=head1 DESCRIPTION
+
+C<Test::CheckManifest>
+
+=head2 EXPORT
+
+There is only one method exported: C<ok_manifest>
+
+=head1 METHODS
+
+=head2 ok_manifest [{exlude => $arref}][$msg]
+
+checks whether the Manifest file matches the distro or not. To match a distro
+the Manifest has to name all files that come along with the distribution.
+
+To check the Manifest file, this module searches for a file named C<MANIFEST>.
+
+To exclude some directories from this test, you can specify these dirs in the
+hashref.
+
+ ok_manifest({exclude => ['/var/test/']});
+
+is ok if the files in C</path/to/your/dist/var/test/> are not named in the
+C<MANIFEST> file. That means that the paths in the exclude array must be
+"pseudo-absolute" (absolute to your distribution).
+
+To use a "filter" you can use the key "filter"
+
+ ok_manifest({filter => [qr/\.svn/]});
+
+With that you can exclude all files with an '.svn' in the filename or in the
+path from the test.
+
+These files would be excluded (as examples):
+
+=over 4
+
+=item * /dist/var/.svn/test
+
+=item * /dist/lib/test.svn
+
+=back
+
+You can also combine "filter" and "exclude" with 'and' or 'or' default is 'or':
+
+ ok_manifest({exclude => ['/var/test'],
+ filter => [qr/\.svn/],
+ bool => 'and'});
+
+These files have to be named in the C<MANIFEST>:
+
+=over 4
+
+=item * /var/foo/.svn/any.file
+
+=item * /dist/t/file.svn
+
+=item * /var/test/test.txt
+
+=back
+
+These files not:
+
+=over 4
+
+=item * /var/test/.svn/*
+
+=item * /var/test/file.svn
+
+=back
+
+=head1 ACKNOWLEDGEMENT
+
+Great thanks to Christopher H. Laco, who did a lot of testing stuff for me and
+he reported some bugs to RT.
+
+=head1 AUTHOR
+
+Renee Baecker, E<lt>module at renee-baecker.deE<gt>
+
+=head1 COPYRIGHT AND LICENSE
+
+Copyright (C) 2006 by Renee Baecker
+
+This library is free software; you can redistribute it and/or modify
+it under the same terms as Perl itself, either Perl version 5.8.6 or,
+at your option, any later version of Perl 5 you may have available.
+
+
+=cut
Propchange: branches/upstream/libtest-checkmanifest-perl/current/lib/Test/CheckManifest.pm
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/t/00_load.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/t/00_load.t?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/t/00_load.t (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/t/00_load.t Sat Jul 11 04:33:50 2009
@@ -1,0 +1,7 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use Test::More tests => 1;
+
+use_ok('Test::CheckManifest');
Propchange: branches/upstream/libtest-checkmanifest-perl/current/t/00_load.t
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/t/01_selftest.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/t/01_selftest.t?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/t/01_selftest.t (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/t/01_selftest.t Sat Jul 11 04:33:50 2009
@@ -1,0 +1,60 @@
+#!/usr/bin/perl -T
+
+use strict;
+use warnings;
+use File::Spec;
+use File::Basename;
+use Test::More;
+
+eval "use Test::CheckManifest tests => 10";
+plan skip_all => "Test::CheckManifest required" if $@;
+
+ok_manifest();
+
+# create a directory and a file
+my $home = dirname(File::Spec->rel2abs($0));
+
+
+
+# untaint
+if ($home =~ /^([-\@\w.\/\\: ~]+)$/) {
+ $home = $1;
+}
+else {
+ die "Bad data in $home";
+}
+
+my $dir = $home . '/.svn/';
+my $dir2 = $home . '/test/';
+my ($file1,$file2,$file3) = ($dir.'test.txt', $home . '/test.svn', $dir2.'hallo.txt');
+
+mkdir $dir;
+
+my $fh;
+open $fh ,'>',$file1 and close $fh;
+open $fh ,'>',$file2 and close $fh;
+
+Test::CheckManifest::_not_ok_manifest('expected: Manifest not ok');
+ok_manifest({filter => [qr/\.svn/]},'Filter: \.svn');
+Test::CheckManifest::_not_ok_manifest({exclude => ['/t/.svn/']},'expected: Manifest not ok (Exclude /t/.svn/)');
+
+mkdir $dir2;
+open $fh ,'>',$file3 and close $fh;
+Test::CheckManifest::_not_ok_manifest({filter => [qr/\.svn/]},'Filter: \.svn');
+Test::CheckManifest::_not_ok_manifest({exclude => ['/t/.svn/']},'expected: Manifest not ok (Exclude /t/.svn/) [2]');
+Test::CheckManifest::_not_ok_manifest({filter => [qr/\.svn/], exclude => ['/t/.svn/']},'expected: Manifest not ok (exclude OR filter)');
+Test::CheckManifest::_not_ok_manifest({filter => [qr/\.svn/],
+ bool => 'and',
+ exclude => ['/t/test']}, 'filter AND exclude');
+ok_manifest({filter => [qr/\.svn/],
+ exclude => ['/t/test']}, 'filter OR exclude');
+
+unlink $file3;
+
+ok_manifest({filter => [qr/\.svn/]},'Filter \.svn');
+
+unlink $file2, $file1;
+rmdir $dir;
+rmdir $dir2;
+
+
Propchange: branches/upstream/libtest-checkmanifest-perl/current/t/01_selftest.t
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/t/98_boilerplate.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/t/98_boilerplate.t?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/t/98_boilerplate.t (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/t/98_boilerplate.t Sat Jul 11 04:33:50 2009
@@ -1,0 +1,48 @@
+#!perl -T
+
+use strict;
+use warnings;
+use Test::More tests => 3;
+
+sub not_in_file_ok {
+ my ($filename, %regex) = @_;
+ open my $fh, "<", $filename
+ or die "couldn't open $filename for reading: $!";
+
+ my %violated;
+
+ while (my $line = <$fh>) {
+ while (my ($desc, $regex) = each %regex) {
+ if ($line =~ $regex) {
+ push @{$violated{$desc}||=[]}, $.;
+ }
+ }
+ }
+
+ if (%violated) {
+ fail("$filename contains boilerplate text");
+ diag "$_ appears on lines @{$violated{$_}}" for keys %violated;
+ } else {
+ pass("$filename contains no boilerplate text");
+ }
+}
+
+not_in_file_ok(README =>
+ "The README is used..." => qr/The README is used/,
+ "'version information here'" => qr/to provide version information/,
+);
+
+not_in_file_ok(Changes =>
+ "placeholder date/time" => qr(Date/time)
+);
+
+sub module_boilerplate_ok {
+ my ($module) = @_;
+ not_in_file_ok($module =>
+ 'the great new $MODULENAME' => qr/ - The great new /,
+ 'boilerplate description' => qr/Quick summary of what the module/,
+ 'stub function definition' => qr/function[12]/,
+ );
+}
+
+module_boilerplate_ok('lib/Test/CheckManifest.pm');
Propchange: branches/upstream/libtest-checkmanifest-perl/current/t/98_boilerplate.t
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/t/99_pod.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/t/99_pod.t?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/t/99_pod.t (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/t/99_pod.t Sat Jul 11 04:33:50 2009
@@ -1,0 +1,10 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use FindBin ();
+use Test::More;
+
+eval "use Test::Pod 1.00";
+plan skip_all => "Test::Pod 1.00 required" if $@;
+all_pod_files_ok();
Propchange: branches/upstream/libtest-checkmanifest-perl/current/t/99_pod.t
------------------------------------------------------------------------------
svn:executable =
Added: branches/upstream/libtest-checkmanifest-perl/current/t/99_pod_coverage.t
URL: http://svn.debian.org/wsvn/pkg-perl/branches/upstream/libtest-checkmanifest-perl/current/t/99_pod_coverage.t?rev=39698&op=file
==============================================================================
--- branches/upstream/libtest-checkmanifest-perl/current/t/99_pod_coverage.t (added)
+++ branches/upstream/libtest-checkmanifest-perl/current/t/99_pod_coverage.t Sat Jul 11 04:33:50 2009
@@ -1,0 +1,9 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use Test::More;
+
+eval "use Test::Pod::Coverage 1.08";
+plan skip_all => "Test::Pod::Coverage 1.08 required" if $@;
+all_pod_coverage_ok();
Propchange: branches/upstream/libtest-checkmanifest-perl/current/t/99_pod_coverage.t
------------------------------------------------------------------------------
svn:executable =
More information about the Pkg-perl-cvs-commits
mailing list