From: Sebastian Riedel Date: Fri, 25 Mar 2005 13:09:39 +0000 (+0000) Subject: fixed problems with mod_perl2 X-Git-Tag: 5.7099_04~1688 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=b76d7db825981c235ff6cfa02b3d393424eaea0e;p=catagits%2FCatalyst-Runtime.git fixed problems with mod_perl2 --- diff --git a/Changes b/Changes index 2d6ca91..0bbd53a 100644 --- a/Changes +++ b/Changes @@ -2,6 +2,7 @@ This file documents the revision history for Perl extension Catalyst. 5.00 XXX XXX XX XX:00:00 2005 - whole new core for private action inheritance + - problems with mod_perl2 fixed 4.34 Wed Mar 23 07:00:00 2005 - added some messages to Makefile.PL diff --git a/lib/Catalyst/Engine.pm b/lib/Catalyst/Engine.pm index efdc18d..be5c580 100644 --- a/lib/Catalyst/Engine.pm +++ b/lib/Catalyst/Engine.pm @@ -386,13 +386,13 @@ sub get_action { return []; } -=item $c->handler($r) +=item $c->handler( $class, $r ) Handles the request. =cut -sub handler { +sub handler ($$) { my ( $class, $r ) = @_; # Always expect worst case!