X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FEngine.pm;h=0aeefac74b42020c0b7bdb9c2a30fab2d970fac6;hb=e2fd5b5f162a33895ad401a8d31fca481c478a8c;hp=b42f8bfcc76ac3d8799950cf0aa2e726523522da;hpb=e88fa0583c4c7f6b06e76e125f2fae681202ae0a;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index b42f8bf..0aeefac 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -361,14 +361,14 @@ Finalize headers. sub finalize_headers { } -=item $c->handler( $class, $engine ) +=item $c->handler( $class, @arguments ) Handles the request. =cut sub handler { - my ( $class, $engine ) = @_; + my ( $class, @arguments ) = @_; # Always expect worst case! my $status = -1; @@ -376,7 +376,7 @@ sub handler { my @stats = (); my $handler = sub { - my $c = $class->prepare($engine); + my $c = $class->prepare(@arguments); $c->{stats} = \@stats; $c->dispatch; return $c->finalize; @@ -410,7 +410,7 @@ sub handler { return $status; } -=item $c->prepare($engine) +=item $c->prepare(@arguments) Turns the engine-specific request( Apache, CGI ... ) into a Catalyst context . @@ -418,7 +418,7 @@ into a Catalyst context . =cut sub prepare { - my ( $class, $engine ) = @_; + my ( $class, @arguments ) = @_; my $c = bless { counter => {}, @@ -454,7 +454,7 @@ sub prepare { $c->res->headers->header( 'X-Catalyst' => $Catalyst::VERSION ); } - $c->prepare_request($engine); + $c->prepare_request(@arguments); $c->prepare_connection; $c->prepare_headers; $c->prepare_cookies;