X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FEngine.pm;h=ec4842b34ebba1bdd4055e93ce28611c950cc6c9;hp=4ce7e3b7b73a821fa546c80f32cbc64d6e9ff34c;hb=970cc51d658caacc56714f712fa567398ee48218;hpb=ac73326467a355b37917b030d8413c4838468aee diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index 4ce7e3b..ec4842b 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -287,7 +287,7 @@ sub forward { } } for my $result ( @{$results} ) { - $c->state( $c->process( @{ $result->[0] } ) ); + $c->state( $c->execute( @{ $result->[0] } ) ); } return $c->state; } @@ -367,14 +367,14 @@ sub handler ($$) { $namespace ||= '/'; if ( @{$results} ) { for my $begin ( @{ $c->get_action( 'begin', $namespace ) } ) { - $c->state( $c->process( @{ $begin->[0] } ) ); + $c->state( $c->execute( @{ $begin->[0] } ) ); } for my $result ( @{ $c->get_action( $action, $default ) } ) { - $c->state( $c->process( @{ $result->[0] } ) ); + $c->state( $c->execute( @{ $result->[0] } ) ); last unless $default; } for my $end ( @{ $c->get_action( 'end', $namespace ) } ) { - $c->state( $c->process( @{ $end->[0] } ) ); + $c->state( $c->execute( @{ $end->[0] } ) ); } } else { @@ -564,14 +564,14 @@ Prepare uploads. sub prepare_uploads { } -=item $c->process($class, $coderef) +=item $c->execute($class, $coderef) -Process a coderef in given class and catch exceptions. +Execute a coderef in given class and catch exceptions. Errors are available via $c->error. =cut -sub process { +sub execute { my ( $c, $class, $code ) = @_; $class = $c->comp($class) || $class; $c->state(0);