X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction.pm;h=af60527acaf016595a73357cbcbf16cc5c629cec;hb=gsoc_breadboard;hp=87b37fd6f13c192945c14d53039611d1afa72e67;hpb=8f6cebb2303a0b0eda9422430f926c3f83c72aed;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Action.pm b/lib/Catalyst/Action.pm index 87b37fd..af60527 100644 --- a/lib/Catalyst/Action.pm +++ b/lib/Catalyst/Action.pm @@ -88,6 +88,19 @@ sub compare { return $a1_args <=> $a2_args; } +sub number_of_args { + my ( $self ) = @_; + return 0 unless exists $self->attributes->{Args}; + return $self->attributes->{Args}[0]; +} + +sub number_of_captures { + my ( $self ) = @_; + + return 0 unless exists $self->attributes->{CaptureArgs}; + return $self->attributes->{CaptureArgs}[0] || 0; +} + __PACKAGE__->meta->make_immutable; 1; @@ -147,10 +160,29 @@ C of an action is always suitable for passing to C. Returns the sub name of this action. +=head2 number_of_args + +Returns the number of args this action expects. This is 0 if the action doesn't take any arguments and undef if it will take any number of arguments. + +=head2 number_of_captures + +Returns the number of captures this action expects for L actions. + =head2 meta Provided by Moose. +=head1 OPTIONAL METHODS + +=head2 match_captures + +Can be implemented by action class and action role authors. If the method +exists, then it will be called with the request context and an array reference +of the captures for this action. + +Returning true from this method causes the chain match to continue, returning +makes the chain not match (and alternate, less preferred chains will be attempted). + =head1 AUTHORS Catalyst Contributors, see Catalyst.pm