cannot have --archive option with --harness

Andy Armstrong andy at hexten.net
Wed Sep 5 17:32:49 BST 2007


On 5 Sep 2007, at 17:22, Andy Armstrong wrote:
> You don't really need to do any subclassing for prove do you?
> App::Prove now has
>
> sub _runtests {
>      my ( $self, $args, $harness_class, @tests ) = @_;
>      my $harness    = $harness_class->new($args);
>      my $aggregator = $harness->runtests(@tests);
>
>      exit $aggregator->has_problems ? 1 : 0;
> }
>
> which looks like a reasonable place to inject your functionality: new
> and runtests in one place.
>
>  From a quick skim of your code it looks like you don't actually need
> to replace runtests - just arrange for your code to be executed
> either side of it. Is that right?

And if you wanted to make things tidier we could add before_runtests  
and after_runtests callbacks to the harness that you could hook your  
code into.

-- 
Andy Armstrong, hexten.net



More information about the tapx-dev mailing list