r54103 - in /trunk/libtest-pod-perl: Build.PL Changes MANIFEST META.yml README debian/changelog debian/control lib/Test/Pod.pm t/all_pod_files.t t/pod/good-pod-script.bat
jawnsy-guest at users.alioth.debian.org
jawnsy-guest at users.alioth.debian.org
Thu Mar 11 16:38:39 UTC 2010
Author: jawnsy-guest
Date: Thu Mar 11 16:38:25 2010
New Revision: 54103
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=54103
Log:
* New upstream release
* Standards-Version 3.8.4 (no changes)
Added:
trunk/libtest-pod-perl/README
- copied unchanged from r54102, branches/upstream/libtest-pod-perl/current/README
trunk/libtest-pod-perl/t/pod/good-pod-script.bat
- copied unchanged from r54102, branches/upstream/libtest-pod-perl/current/t/pod/good-pod-script.bat
Modified:
trunk/libtest-pod-perl/Build.PL
trunk/libtest-pod-perl/Changes
trunk/libtest-pod-perl/MANIFEST
trunk/libtest-pod-perl/META.yml
trunk/libtest-pod-perl/debian/changelog
trunk/libtest-pod-perl/debian/control
trunk/libtest-pod-perl/lib/Test/Pod.pm
trunk/libtest-pod-perl/t/all_pod_files.t
Modified: trunk/libtest-pod-perl/Build.PL
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/Build.PL?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/Build.PL (original)
+++ trunk/libtest-pod-perl/Build.PL Thu Mar 11 16:38:25 2010
@@ -1,6 +1,6 @@
use strict;
use warnings;
-use Module::Build;
+use Module::Build '0.30';
Module::Build->new(
module_name => 'Test::Pod',
@@ -19,7 +19,7 @@
meta_merge => {
resources => {
homepage => 'http://search.cpan.org/dist/Test-Pod/',
- bugtracker => 'http://github.com/theory/test-xpod/issues/',
+ bugtracker => 'http://github.com/theory/test-pod/issues/',
repository => 'http://github.com/theory/test-pod/tree/',
}
},
Modified: trunk/libtest-pod-perl/Changes
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/Changes?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/Changes (original)
+++ trunk/libtest-pod-perl/Changes Thu Mar 11 16:38:25 2010
@@ -1,4 +1,27 @@
Change log for Test::Pod
+
+1.42 - 2010-03-10T19:41:20
+ * Fixed invalid Pod link. Thanks to Markus Sonderegger.
+ * Changed license in the POD to "Same as Perl" to match the license listed in
+ `META.yml`.
+ * Changed `Build.PL` to require Module::Build 0.30. It already does in
+ `configure_requires`, but also doing so on the `use` line helps provide
+ a more useful error message in older toolchain tools that don't use
+ `configure_requires`.
+ * Updated `MANIFEST` so that the `README` is actually included in the
+ distribution.
+ * Now recognizes `.bat` files as Perl files when they contain
+ "--*-Perl-*--" on the first line. Thanks to Olivier 'dolmen' Mengué for
+ the patch (RT #46973).
+ * `all_pod_files_ok()` now operates on directories as well as files.
+ Thanks to Adriano Ferreira for the patch (RT #33025).
+ * Files with no POD now have " (no pod)" added to test name. Thanks to
+ Adriano Ferreira for the patch (RT #34955).
+ * Updated documentation to note that `.PL` files are considered Perl
+ files. Thanks to Adriano Ferreira for the spot (RT #34955).
+ * `all_pod_files_ok()` now lets `pod_file_ok()` set the default test name,
+ rather than doing so itself. Thanks to Adriano Ferreira for the spot (RT
+ #34955).
1.41 - 2010-01-14T20:09:25
* Maintenance transfered to David Wheeler.
Modified: trunk/libtest-pod-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/MANIFEST?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/MANIFEST (original)
+++ trunk/libtest-pod-perl/MANIFEST Thu Mar 11 16:38:25 2010
@@ -3,6 +3,7 @@
lib/Test/Pod.pm
MANIFEST This list of files
META.yml
+README
t/00-load.t
t/all_pod_files.t
t/cut-outside-block.pod
@@ -15,6 +16,7 @@
t/missing-file.t
t/pod.t
t/pod/good-pod-script
+t/pod/good-pod-script.bat
t/pod/good.pod
t/pod/no_pod.pod
t/selftest.t
Modified: trunk/libtest-pod-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/META.yml?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/META.yml (original)
+++ trunk/libtest-pod-perl/META.yml Thu Mar 11 16:38:25 2010
@@ -16,15 +16,15 @@
provides:
Test::Pod:
file: lib/Test/Pod.pm
- version: 1.41
+ version: 1.42
requires:
File::Spec: 0
Pod::Simple: 3.07
Test::Builder::Tester: 1.02
Test::More: 0.70
resources:
- bugtracker: http://github.com/theory/test-xpod/issues/
+ bugtracker: http://github.com/theory/test-pod/issues/
homepage: http://search.cpan.org/dist/Test-Pod/
license: http://dev.perl.org/licenses/
repository: http://github.com/theory/test-pod/tree/
-version: 1.41
+version: 1.42
Modified: trunk/libtest-pod-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/debian/changelog?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/debian/changelog (original)
+++ trunk/libtest-pod-perl/debian/changelog Thu Mar 11 16:38:25 2010
@@ -1,3 +1,10 @@
+libtest-pod-perl (1.42-1) UNRELEASED; urgency=low
+
+ * New upstream release
+ * Standards-Version 3.8.4 (no changes)
+
+ -- Jonathan Yu <jawnsy at cpan.org> Thu, 11 Mar 2010 12:04:38 -0500
+
libtest-pod-perl (1.41-1) unstable; urgency=low
[ Jonathan Yu ]
Modified: trunk/libtest-pod-perl/debian/control
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/debian/control?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/debian/control (original)
+++ trunk/libtest-pod-perl/debian/control Thu Mar 11 16:38:25 2010
@@ -7,7 +7,7 @@
Maintainer: Debian Perl Group <pkg-perl-maintainers at lists.alioth.debian.org>
Uploaders: Jay Bonci <jaybonci at debian.org>, Gunnar Wolf <gwolf at debian.org>,
gregor herrmann <gregoa at debian.org>, Jonathan Yu <jawnsy at cpan.org>
-Standards-Version: 3.8.3
+Standards-Version: 3.8.4
Homepage: http://search.cpan.org/dist/Test-Pod/
Vcs-Svn: svn://svn.debian.org/pkg-perl/trunk/libtest-pod-perl/
Vcs-Browser: http://svn.debian.org/viewsvn/pkg-perl/trunk/libtest-pod-perl/
@@ -16,7 +16,7 @@
Architecture: all
Depends: ${perl:Depends}, ${misc:Depends}, libio-stringy-perl,
libpod-simple-perl
-Description: Perl module to test for POD errors
+Description: module to test for POD errors
Test::Pod is a simple test for Perl's Plain Old Documentation (POD) format. It
checks your distribution's module, script and documentation files for issues
with the documentation syntax. In the CPAN community, it is considered a best
Modified: trunk/libtest-pod-perl/lib/Test/Pod.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/lib/Test/Pod.pm?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/lib/Test/Pod.pm (original)
+++ trunk/libtest-pod-perl/lib/Test/Pod.pm Thu Mar 11 16:38:25 2010
@@ -8,11 +8,11 @@
=head1 VERSION
-Version 1.41
-
-=cut
-
-our $VERSION = '1.41';
+Version 1.42
+
+=cut
+
+our $VERSION = '1.42';
=head1 SYNOPSIS
@@ -135,6 +135,7 @@
my $ok = !$checker->any_errata_seen;
$ok = _additional_test_pod_specific_checks( $ok, ($checker->{errata}||={}), $file );
+ $name .= ' (no pod)' if !$checker->content_seen;
$Test->ok( $ok, $name );
if ( !$ok ) {
my $lines = $checker->{errata};
@@ -147,17 +148,17 @@
return $ok;
} # pod_file_ok
-=head2 all_pod_files_ok( [@files/@directories] )
-
-Checks all the files in C<@files> for valid POD. It runs
-L<all_pod_files()> on each file/directory, and calls the C<plan()>
-function for you (one test for each function), so you can't have
-already called C<plan>.
-
-If C<@files> is empty or not passed, the function finds all POD
-files in the F<blib> directory if it exists, or the F<lib> directory
-if not. A POD file is one that ends with F<.pod>, F<.pl> and F<.pm>,
-or any file where the first line looks like a shebang line.
+=head2 all_pod_files_ok( [@entries] )
+
+Checks all the files under C<@entries> for valid POD. It runs
+L<all_pod_files()> on directories and assumes everything else to be a file to
+be tested. It calls the C<plan()> function for you (one test for each file),
+so you can't have already called C<plan>.
+
+If C<@entries> is empty or not passed, the function finds all POD files in
+files in the F<blib> directory if it exists, or the F<lib> directory if not. A
+POD file is one that ends with F<.pod>, F<.pl> and F<.pm>, or any file where
+the first line looks like a shebang line.
If you're testing a module, just make a F<t/pod.t>:
@@ -171,32 +172,34 @@
=cut
sub all_pod_files_ok {
- my @files = @_ ? @_ : all_pod_files();
+ my @args = @_ ? @_ : _starting_points();
+ my @files = map { -d $_ ? all_pod_files($_) : $_ } @args;
$Test->plan( tests => scalar @files );
my $ok = 1;
foreach my $file ( @files ) {
- pod_file_ok( $file, $file ) or undef $ok;
+ pod_file_ok( $file ) or undef $ok;
}
return $ok;
}
=head2 all_pod_files( [@dirs] )
-Returns a list of all the Perl files in I<$dir> and in directories
-below. If no directories are passed, it defaults to F<blib> if
-F<blib> exists, or else F<lib> if not. Skips any files in CVS,
-.svn, .git and similar directories. See C<%Test::Pod::ignore_dirs>
-for a list of them.
+Returns a list of all the Perl files in I<@dirs> and in directories below. If
+no directories are passed, it defaults to F<blib> if F<blib> exists, or else
+F<lib> if not. Skips any files in CVS, .svn, .git and similar directories. See
+C<%Test::Pod::ignore_dirs> for a list of them.
A Perl file is:
=over 4
-=item * Any file that ends in F<.PL>, F<.pl>, F<.pm>, F<.pod> or F<.t>.
+=item * Any file that ends in F<.PL>, F<.pl>, F<.PL>, F<.pm>, F<.pod>, or F<.t>.
=item * Any file that has a first line with a shebang and "perl" on it.
+
+=item * Any file that ends in F<.bat> and has a first line with "--*-Perl-*--" on it.
=back
@@ -253,7 +256,7 @@
my $first = <$fh>;
close $fh;
- return 1 if defined $first && ($first =~ /^#!.*perl/);
+ return 1 if defined $first && ($first =~ /(?:^#!.*perl)|--\*-Perl-\*--/);
return;
}
@@ -284,12 +287,12 @@
Peter Edwards
for contributions and to C<brian d foy> for the original code.
-=head1 COPYRIGHT
+=head1 COPYRIGHT AND LICENSE
Copyright 2006-2010, Andy Lester. Some Rights Reserved.
-You may use, modify, and distribute this package under the terms
-as the Artistic License v2.0 or GNU Public License v2.0.
+This module is free software; you can redistribute it and/or modify it under
+the same terms as Perl itself.
=cut
Modified: trunk/libtest-pod-perl/t/all_pod_files.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libtest-pod-perl/t/all_pod_files.t?rev=54103&op=diff
==============================================================================
--- trunk/libtest-pod-perl/t/all_pod_files.t (original)
+++ trunk/libtest-pod-perl/t/all_pod_files.t Thu Mar 11 16:38:25 2010
@@ -13,6 +13,7 @@
@expected = (
File::Spec->catfile( 'blib', 'lib', 'Test', 'Pod.pm' ),
File::Spec->catfile( 't', 'pod', 'good-pod-script.' ),
+ File::Spec->catfile( 't', 'pod', 'good-pod-script.bat' ),
File::Spec->catfile( 't', 'pod', 'good.pod' ),
File::Spec->catfile( 't', 'pod', 'no_pod.pod' ),
);
@@ -23,6 +24,7 @@
@expected = qw(
blib/lib/Test/Pod.pm
t/pod/good-pod-script
+ t/pod/good-pod-script.bat
t/pod/good.pod
t/pod/no_pod.pod
);
More information about the Pkg-perl-cvs-commits
mailing list