[svn:parrot] r29891 - trunk/t/steps

[jkeenan@xxxxxxxxxxxx]

Author: jkeenan
Date: Wed Jul 30 16:23:27 2008
New Revision: 29891

Modified:
   trunk/t/steps/auto_ctags-01.t

Log:
Responding to reports of failures of one test in
http://rt.perl.org/rt3/Ticket/Display.html?id=56716 and Smolder and smoke
tests.  Relaxing test to look for definedness of result, rather than matching
a particular result string.


Modified: trunk/t/steps/auto_ctags-01.t
==============================================================================
--- trunk/t/steps/auto_ctags-01.t       (original)
+++ trunk/t/steps/auto_ctags-01.t       Wed Jul 30 16:23:27 2008
@@ -61,12 +61,10 @@
         sub { $step->runstep($conf) },
         \$stdout
     );
-SKIP: {
-    skip 'Tests not yet passing on Win32',
-    3
-    if $^O =~ m/win32/i;
+TODO: {
+    local $TODO = 'Tests not yet passing on Win32';
     ok( $ret, "runstep() returned true value" );
-    is($step->result(), q{no}, "Got expected result");
+    ok( defined $step->result(), "Result was defined");
     is($conf->data->get('ctags'), 'ctags',
         "Correct value for 'ctags' attribute was set");
 }