From: Marcus Ramberg Date: Sat, 12 Nov 2005 19:46:10 +0000 (+0000) Subject: added support for Model/View/Controller namespace relative X-Git-Tag: 5.7099_04~943 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=commitdiff_plain;h=527ada1372760bc4de77f346ad3892c832baf43f;hp=b304b69e0bfefe7624baf1c4f95c50c3b8335d5c added support for Model/View/Controller namespace relative prepared for 5.49_05 --- diff --git a/Changes b/Changes index bdec2b4..e2ac51a 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,6 @@ Tis file documents the revision history for Perl extension Catalyst. -5.50 +5.49_05 2005-11-12 20:45:00 - Large update to the documentation. (David Kamholz) - Fixed args handling in forward() - Fixed forwarding to classes diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm index ccdc85e..4fc35f1 100644 --- a/lib/Catalyst.pm +++ b/lib/Catalyst.pm @@ -54,7 +54,7 @@ __PACKAGE__->engine_class('Catalyst::Engine::CGI'); __PACKAGE__->request_class('Catalyst::Request'); __PACKAGE__->response_class('Catalyst::Response'); -our $VERSION = '5.49_04'; +our $VERSION = '5.49_05'; sub import { my ( $class, @arguments ) = @_; @@ -357,7 +357,8 @@ sub component { my @names = ( $name, "${appclass}::${name}", - map { "${appclass}::${_}::${name}" } qw/M V C/ + map { "${appclass}::${_}::${name}" } + qw/Model M Controller C View V/ ); foreach my $try (@names) {