diff options
Diffstat (limited to 't/lib/WebCoso/Pipeline/Test.pm')
-rw-r--r-- | t/lib/WebCoso/Pipeline/Test.pm | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/t/lib/WebCoso/Pipeline/Test.pm b/t/lib/WebCoso/Pipeline/Test.pm index 239d74b..6920f46 100644 --- a/t/lib/WebCoso/Pipeline/Test.pm +++ b/t/lib/WebCoso/Pipeline/Test.pm @@ -1,13 +1,22 @@ package WebCoso::Pipeline::Test; use strict; use warnings; +use base 'WebCoso::Pipeline::Base'; + +__PACKAGE__->set_steps(qw(Step1 Step2)); my @calls; sub process { my ($class,$resource)=@_; - push @calls, { resource => $resource }; - return 1; + + my $call={ resource => $resource }; + + my $ret=$class->SUPER::process($resource); + + push @calls, $call; + + return $ret; } sub get_calls { |