X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FController.pm;h=49591d3b64e24ea8586436d5c9f255d37d7c2e9d;hb=e9ba5c119a81f59f8339cd5c749709f5bc56b6d6;hp=c738f9ee309c369dc56a1edf24a6c8856821817d;hpb=cea3f28ab5be5ba72557325c49fe684eb18e627d;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Controller.pm b/lib/Catalyst/Controller.pm index c738f9e..49591d3 100644 --- a/lib/Catalyst/Controller.pm +++ b/lib/Catalyst/Controller.pm @@ -71,11 +71,14 @@ for more info about how Catalyst dispatches to actions. #I think both of these could be attributes. doesn't really seem like they need #to ble class data. i think that attributes +default would work just fine -__PACKAGE__->mk_classdata($_) for qw/_dispatch_steps _action_class/; +__PACKAGE__->mk_classdata($_) for qw/_dispatch_steps/; __PACKAGE__->_dispatch_steps( [qw/_BEGIN _AUTO _ACTION/] ); -__PACKAGE__->_action_class('Catalyst::Action'); +has _action_class => ( + is => 'rw', + default => 'Catalyst::Action', +); sub _DISPATCH : Private { my ( $self, $c ) = @_; @@ -248,14 +251,21 @@ sub register_action_methods { } } -sub create_action { - my $self = shift; - my %args = @_; +sub action_class { + my ($self, %args) = @_; my $class = (exists $args{attributes}{ActionClass} ? $args{attributes}{ActionClass}[0] : $self->_action_class); Class::MOP::load_class($class); + return $class; +} + +sub create_action { + my $self = shift; + my %args = @_; + + my $class = $self->action_class(%args); my $action_args = $self->config->{action_args}; my %extra_args = ( @@ -446,22 +456,45 @@ of setting namespace to '' (the null string). Sets 'path_prefix', as described below. +=head2 action + +Allows you to set the attributes that the dispatcher creates actions out of. +This allows you to do 'rails style routes', or override some of the +attribute defintions of actions composed from Roles. +You can set arguments globally (for all actions of the controller) and +specifically (for a single action). + + __PACKAGE__->config( + action => { + '*' => { Chained => 'base', Args => 0 }, + base => { Chained => '/', PathPart => '', CaptureArgs => 0 }, + }, + ); + +In the case above every sub in the package would be made into a Chain +endpoint with a URI the same as the sub name for each sub, chained +to the sub named C. Ergo dispatch to C would call the +C method, then the C method. + =head2 action_args -Allows you to set constructor arguments on your Actions or ActionRoles. You can -set args globally (all actions of the controller) and specifically (for a single -action). +Allows you to set constructor arguments on your actions. You can set arguments +globally and specifically (as above). +This is particularly useful when using Cs +(L) and custom Ces. - __PACKAGE__->config({ + __PACKAGE__->config( action_args => { - '*' => {globalarg1=>'hello', globalarg2=>'goodbye'}, - 'specific_action' => {customarg=>'arg1'}, + '*' => { globalarg1 => 'hello', globalarg2 => 'goodbye' }, + 'specific_action' => { customarg => 'arg1' }, }, - }); + ); + +In the case above the action class associated with C would get +passed the following arguments, in addition to the normal action constructor +arguments, when it is instantiated: -In the case above the action class associated with 'specific_action' would get -passed the following arguments when it is instantiated: (globalarg1=>'hello', -globalarg2=>'goodbye', 'customarg=>'arg1'). + (globalarg1 => 'hello', globalarg2 => 'goodbye', customarg => 'arg1') =head1 METHODS