Add missing POD and fix POD typos in subroutine names. 30/441 failing 100% POD coverage.

This commit is contained in:
Colin Kuskie 2009-07-04 20:09:35 +00:00
parent 2e2e436d1f
commit 3cd1e13051
3 changed files with 65 additions and 1 deletions

View file

@ -757,6 +757,14 @@ END_WHY
}
#-------------------------------------------------------------------
=head2 pass
Output TAP for a passing test.
=cut
sub pass {
my ($testCount, $name, $extra) = @_;
my $out = $name ? "ok $testCount - $name" : "ok $testCount";
@ -767,6 +775,14 @@ sub pass {
return $out;
}
#-------------------------------------------------------------------
=head2 fail
Output TAP for a failing test, along with diagnostics.
=cut
sub fail {
my ($testCount, $name, $extra) = @_;
my $out = $name ? "not ok $testCount - $name" : "not ok $testCount";