X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=33e88dbe417e95dd6f26121fb991132ed7ba1cba;hp=49c017598c99df14042a169b373e363208629ca9;hb=e3a1377127efe66e918a24b9fa5275a3d2aa51e0;hpb=d59b65330ba88fe0b7314ffb7afc487a79f259ac diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index 49c0175..33e88db 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -353,8 +353,8 @@ sub component { my @names = ( $name, "${appclass}::${name}", - map { "${appclass}::${_}::${name}" } - qw/Model M Controller C View V/ + map { "${appclass}::${_}::${name}" } + qw/Model M Controller C View V/ ); foreach my $try (@names) { @@ -1201,14 +1201,15 @@ sub prepare { # On-demand parsing $c->prepare_body unless $c->config->{parse_on_demand}; - $c->prepare_action; my $method = $c->req->method || ''; my $path = $c->req->path || ''; my $address = $c->req->address || ''; - $c->log->debug(qq/"$method" request for "$path" from $address/) + $c->log->debug(qq/"$method" request for "$path" from "$address"/) if $c->debug; + $c->prepare_action; + return $c; }