This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
lib/Pod/t/man.t should use TODO with not ok to express its intentions
authorNicholas Clark <nick@ccl4.org>
Wed, 14 Dec 2005 16:41:33 +0000 (16:41 +0000)
committerNicholas Clark <nick@ccl4.org>
Wed, 14 Dec 2005 16:41:33 +0000 (16:41 +0000)
correctly in TAP. (or alternatively if it really wants to skip, it
needs to print ok)

p4raw-id: //depot/perl@26357

lib/Pod/t/man.t

index 8418939..2225fa4 100644 (file)
@@ -31,7 +31,7 @@ print "ok 1\n";
 
 SKIP: {
     if (defined $ENV{PERL_UNICODE}) {
-        print "not ok 2 # skip Unicode not yet supported\n"
+        print "not ok 2 # TODO Unicode not yet supported\n"
     } else {
         my $pod = <<EOP;
 =head1 ACCENTS