X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=4fd6ed1cc26ae8413c0bfee81d101c8767af32a8;hp=b959d7ccdaee03edd8d51309b74ca2e110bdaefb;hb=refs%2Ftags%2F5.90017;hpb=0df490ef10f0a2deaa3b7950e721fa44659de860 diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index b959d7c..4fd6ed1 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -52,11 +52,11 @@ has request => ( is => 'rw', default => sub { my $self = shift; - $self->request_class->new($self->_build_request_class_construction_parameters); + $self->request_class->new($self->_build_request_constructor_args); }, lazy => 1, ); -sub _build_request_class_construction_parameters { +sub _build_request_constructor_args { my $self = shift; my %p = ( _log => $self->log ); $p{_uploadtmp} = $self->_uploadtmp if $self->_has_uploadtmp; @@ -67,11 +67,11 @@ has response => ( is => 'rw', default => sub { my $self = shift; - $self->response_class->new($self->_build_response_class_construction_parameters); + $self->response_class->new($self->_build_response_constructor_args); }, lazy => 1, ); -sub _build_response_class_construction_parameters { +sub _build_response_constructor_args { my $self = shift; { _log => $self->log }; } @@ -112,7 +112,7 @@ __PACKAGE__->stats_class('Catalyst::Stats'); # Remember to update this in Catalyst::Runtime as well! -our $VERSION = '5.90016'; +our $VERSION = '5.90017'; sub import { my ( $class, @arguments ) = @_;