package WebCoso::Pipeline::Test;
use strict;
use warnings;
use base 'WebCoso::Pipeline::Base';

__PACKAGE__->set_steps(
    Step1 => {p1 => 1},
    Step2 => {p2 => 2}
);

my @calls;

sub process {
    my ($class,$resource,$stage)=@_;

    my $call={ resource => $resource, stage => $stage };

    my $ret=$class->SUPER::process($resource,$stage);

    push @calls, $call;

    return $ret;
}

sub get_calls {
    return @calls;
}

1;