--- Michael G Schwern <[EMAIL PROTECTED]> wrote:
> $tb->plan("no_plan");
> $tb->no_diag(1);
> $tb->no_ending(1);
> $tb->no_header(1);
> $tb->output( File::Spec->devnull );
In that case, can I request the following?
sub Test::Builder::quiet {
my $self = shift;
$self->plan("no_plan");
$self->no_diag(1);
$self->no_ending(1);
$self->no_header(1);
$self->output( File::Spec->devnull );
}
Obviously, the method name should munged to more accurately reflect
what's being done (i.e., using a test module with the testy bits).
Cheers,
Ovid
--
Buy the book - http://www.oreilly.com/catalog/perlhks/
Perl and CGI - http://users.easystreet.com/ovid/cgi_course/
Personal blog - http://publius-ovidius.livejournal.com/
Tech blog - http://use.perl.org/~Ovid/journal/