X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FActionContainer.pm;h=6e01e231058bda4ae88736abce959bd07d8602f6;hb=5400c668d8f1629c468fabd8c13e9ad3f7f71375;hp=f3ff514023f78502152fdf4a23007369cb823a51;hpb=aa6283e424c072151127157dbfb971dcaa589f4b;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/ActionContainer.pm b/lib/Catalyst/ActionContainer.pm index f3ff514..6e01e23 100644 --- a/lib/Catalyst/ActionContainer.pm +++ b/lib/Catalyst/ActionContainer.pm @@ -26,19 +26,20 @@ See L. =over 4 -=item part - -=item actions - -=item new +=item get_action =cut -sub new { # Dumbass constructor - my ( $class, $attrs ) = @_; - return bless { %{ $attrs || {} } }, $class; +sub get_action { + my ( $self, $name ) = @_; + return $self->actions->{$name} if defined $self->actions->{$name}; + return; } +=item actions + +=item part + =back =head1 AUTHOR