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
32 my ( $self, $name ) = @_;
33 return $self->actions->{$name} if defined $self->actions->{$name};
47 This program is free software, you can redistribute it and/or modify it under
48 the same terms as Perl itself.