[672] Added proverun.

[Andy Armstrong]

On 3 Oct 2007, at 16:16, andy at hexten.net wrote:
> +    my $orig_new = \&TAP::Parser::Iterator::Process::new;
> +    *TAP::Parser::Iterator::Process::new = sub {
> +        push @call_log, [ 'new', @_ ];
> +
> +        # And then new turns round and tramples on our args...
> +        $_[1] = { %{ $_[1] } };
> +        $orig_new->(@_);
> +    };

It doesn't actually run anything - just captures the args for the  
program that would have run.

-- 
Andy Armstrong, Hexten