Codebase list libtest-pod-perl / 9fe64be
Minor tweaks. * Update copyright date. * Adjust `t/spaced-directives.t`. It still skips all, but at least it shows what it should expect to find, more or less, and a typo is fixed. David E. Wheeler 14 years ago
2 changed file(s) with 8 addition(s) and 5 deletion(s). Raw diff Collapse all Expand all
267267
268268 =head1 AUTHOR
269269
270 Currently maintained by Andy Lester, C<< <andy at petdance.com> >>.
270 Currently maintained by David E. Wheeler, C<< <david@justatheory.com> >>.
271271
272272 Originally by brian d foy.
273273
274 Maintainer emeritus: Andy Lester, C<< <andy at petdance.com> >>.
275
274276 =head1 ACKNOWLEDGEMENTS
275277
276278 Thanks to
279 Andy Lester,
277280 David Wheeler,
278281 Paul Miller
279282 and
282285
283286 =head1 COPYRIGHT
284287
285 Copyright 2006-2009, Andy Lester, All Rights Reserved.
288 Copyright 2006-2010, Andy Lester. Some Rights Reserved.
286289
287290 You may use, modify, and distribute this package under the terms
288291 as the Artistic License v2.0 or GNU Public License v2.0.
1111
1212 BAD: {
1313 my $name = 'Test name: Something not likely to accidentally occur!';
14 my $file = 't/spaced-rectives.pod';
14 my $file = 't/spaced-directives.pod';
1515 test_out( "not ok 1 - $name" );
1616 pod_file_ok( $file, $name );
1717 test_fail(-1);
18 test_diag( "$file (9): Unknown directive: =over4",);
19 test_diag( "$file (13): Unknown directive: =under",);
18 test_diag('*** WARNING: line containing nothing but whitespace in paragraph at line 11 in file t/spaced-directives.pod');
19 test_diag('*** WARNING: line containing nothing but whitespace in paragraph at line 17 in file t/spaced-directives.pod');
2020 test_test( "$name is bad" );
2121 }