perl.cvs.parrot
[Top] [All Lists]

[svn:parrot] r29822 - trunk/t/doc

Subject: [svn:parrot] r29822 - trunk/t/doc
From: cotto@xxxxxxxxxxxx
Date: Sun, 27 Jul 2008 20:49:00 -0700 (PDT)
Newsgroups: perl.cvs.parrot

Author: cotto
Date: Sun Jul 27 20:49:00 2008
New Revision: 29822

Modified:
   trunk/t/doc/pod.t

Log:
[pod] TODO the Pod description section check


Modified: trunk/t/doc/pod.t
==============================================================================
--- trunk/t/doc/pod.t   (original)
+++ trunk/t/doc/pod.t   Sun Jul 27 20:49:00 2008
@@ -105,7 +105,11 @@
 my $nempty_description = scalar( @empty_description );
 
 is( $bad_syntax_files, q{}, 'Pod syntax correct' );    # only ok if everything 
passed
-is( $empty_description_files, q{}, 'All Pod files have non-empty DESCRIPTION 
sections' );
+
+TODO: {
+    local $TODO = "not quite done yet";
+    is( $empty_description_files, q{}, 'All Pod files have non-empty 
DESCRIPTION sections' );
+}
 
 diag("You should use podchecker to check the failed files.\n")
     if $bad_syntax_files;

<Prev in Thread] Current Thread [Next in Thread>
  • [svn:parrot] r29822 - trunk/t/doc, cotto <=