lib/Pod/t/man.t should use TODO with not ok to express its intentions
Nicholas Clark [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