Skip Menu |
 

This queue is for tickets about the Test-Group CPAN distribution.

Report information
The Basics
Id: 69156
Status: new
Priority: 0/
Queue: Test-Group

People
Owner: Nobody in particular
Requestors: david.storrs [...] gmail.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: TODO tests do not work as documented
Date: Fri, 24 Jun 2011 19:35:59 -0700
To: bug-Test-Group [...] rt.cpan.org
From: David Storrs <david.storrs [...] gmail.com>
Download (untitled) / with headers
text/plain 1.2k
I copied this code pretty much directly from the Synopsis in 'foo.pl': ------------------ #!/env perl use Test::Group; use Test::More; test "a test with TODO in the name is marked TODO" => sub { pass("this part is done"); fail("but I'm not finished with this one yet"); }; { local $TODO = "Test::More's good old method also works"; test "this test is not finished yet" => sub { pass; fail; }; }; done_testing(); ------------------ dstorrs@loki:~/business/channelmeter/code/ChannelMeter$ perl foo.t # Failed test 'but I'm not finished with this one yet' # in foo.t at line 8. not ok 1 - a test with TODO in the name is marked TODO # Failed test 'a test with TODO in the name is marked TODO' # at foo.t line 9. # Failed test in foo.t at line 15. not ok 2 - this test is not finished yet # TODO Test::More's good old method also works # Failed (TODO) test 'this test is not finished yet' # at foo.t line 16. 1..2 # Looks like you failed 1 test of 2. ------------------ If I remove the new-style test ( 'but I'm not finished with this one yet' ), the test is (correctly) marked as failing, and the .t file is (correctly) marked as passing. This is perl v5.10.1 OSX 10.5.8 Test::Group::VERSION => 0.18


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.