- Punted get_action to ActionContainer

[catagits/Catalyst-Runtime.git] / lib / Catalyst / ActionContainer.pm

diff --git a/lib/Catalyst/ActionContainer.pm b/lib/Catalyst/ActionContainer.pm
index 337fdf6..14a2fcc 100644 (file)
--- a/lib/Catalyst/ActionContainer.pm
+++ b/lib/Catalyst/ActionContainer.pm
@@ -26,10 +26,20 @@ See L<Catalyst>.
 
 =over 4
 
-=item part
+=item get_action
+
+=cut
+
+sub get_action {
+    my ( $self, $c, $name ) = @_;
+    return $self->actions->{$name} if defined $self->actions->{$name};
+    return;
+}
 
 =item actions
 
+=item part
+
 =back
 
 =head1 AUTHOR