1 package Catalyst::ActionContainer;
4 use base qw/Class::Accessor::Fast/;
6 __PACKAGE__->mk_accessors(qw/part actions/);
10 # Stringify to path part for tree search
11 q{""} => sub { shift->{part} },
17 Catalyst::ActionContainer - Catalyst Action Container
34 my ( $self, $c, $name ) = @_;
35 return $self->actions->{$name} if defined $self->actions->{$name};
51 This program is free software, you can redistribute it and/or modify it under
52 the same terms as Perl itself.