2008/5/15 Ovid <[EMAIL PROTECTED]>:
> ----- Original Message ----
>
>> From: Fergal Daly <[EMAIL PROTECTED]>
>> To: Gabor Szabo <[EMAIL PROTECTED]>
>> Cc: Perl QA <perl-qa@perl.org>
>> Sent: Thursday, May 15, 2008 1:15:50 PM
>> Subject: Re: Test::NoWarnings and plan skip_all don't like each other
>>
>> This is because skip_all exists immediately but Test::NoWarnings has
>> installed an END block that will run a test anyway. I suppose I should
>> change T::NW to detect "skip_all" and not run its test but at the
>> moment there is no T::B API for detecting "skip_all".
>>
>> MScwern, do you want to add one? What about BAIL_OUT?
>
> If you don't mind diddling with TB's privates:

I've already been burned doing that which is why I'm asking for an API
to be to be added. Of course once the API is added I can fall back to
diddling privates for any version that doesn't have the API,

F

>  my $builder = Test::Builder->new;  # singleton
>  if ( $builder->{Skip_All} ) { ... }
>
> Cheers,
> Ovid
> --
> Buy the book  - http://www.oreilly.com/catalog/perlhks/
> Personal blog - http://publius-ovidius.livejournal.com/
> Tech blog     - http://use.perl.org/~Ovid/journal/
>

Reply via email to