X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FActionContainer.pm;h=6e01e231058bda4ae88736abce959bd07d8602f6;hb=640faa87f0c572b58acd22124bfa6f6c59106873;hp=eb6bb7464d969853716b37ca5a7ba80bcb71df46;hpb=cfd04b0cabf99346090fe4e3312e393364e571ef;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/ActionContainer.pm b/lib/Catalyst/ActionContainer.pm index eb6bb74..6e01e23 100644 --- a/lib/Catalyst/ActionContainer.pm +++ b/lib/Catalyst/ActionContainer.pm @@ -14,7 +14,7 @@ use overload ( =head1 NAME -Catalyst::Action - Catalyst Action +Catalyst::ActionContainer - Catalyst Action Container =head1 SYNOPSIS @@ -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