Ack! Sorry for the slippery fingers, folks. That last message should actually have had some content to go with the quoting :/
<real message> OK, I can see that this one might have been Warnocked, but I can't see how the prove pattern patch (http://www.nntp.perl.org/group/perl.qa/3477) would be. I'd love to see the latter in prove and not being able to override Test::Builder->ok is giving me fits! Cheers, Ovid --- Ovid <[EMAIL PROTECTED]> wrote: > > --- Ovid <[EMAIL PROTECTED]> wrote: > > > Per this message from Schwern > > (http://www.mail-archive.com/perl-qa@perl.org/msg03122.html) on how > > to > > trigger custom behavior for individual tests: > > > > For individual failures, put a wrapper around > > Test::Builder->ok(). Use Hook::LexWrap, Sub::Uplevel > > or Aspects to preserve the call stack. > > > > Well, OK. So I tried it: > > > > use Test::More qw/no_plan/; > > use Test::Builder; > > use Hook::LexWrap; > > use Data::Dumper; > > > > wrap Test::Builder::ok > > pre => sub { die Dumper [EMAIL PROTECTED] }; > > > > ok 1, 'should be good'; > > is 2, 3, 'is 2 3 should be bad'; > > is 'foo', 'foo', 'and this should be good'; > > > > I must be missing something because that didn't die. It quite > > happily > > ran the tests. Can someone please tell me what I am missing? > > > > Cheers, > > Ovid > > > > ===== > > If this message is a response to a question on a mailing list, > please > > send > > follow up questions to the list. > > > > Web Programming with Perl -- > > http://users.easystreet.com/ovid/cgi_course/ > > > > > ===== > If this message is a response to a question on a mailing list, please > send > follow up questions to the list. > > Web Programming with Perl -- > http://users.easystreet.com/ovid/cgi_course/ > ===== If this message is a response to a question on a mailing list, please send follow up questions to the list. Web Programming with Perl -- http://users.easystreet.com/ovid/cgi_course/
