X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FAction.pm;h=b5871ee0b7543ded3a2757d094d7849bf34f7d12;hb=f9d5afbcf71ea8161b7145df4047cd95b8f63be0;hp=d360d68891d82546c91b7a18af6a5f1f2aab4880;hpb=ffca3e960f527321fa30c5ffdfe6ffd2a984af59;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Action.pm b/lib/Catalyst/Action.pm index d360d68..b5871ee 100644 --- a/lib/Catalyst/Action.pm +++ b/lib/Catalyst/Action.pm @@ -103,10 +103,14 @@ sub number_of_captures { return $self->attributes->{CaptureArgs}[0] || 0; } +sub scheme { + return exists $_[0]->attributes->{Scheme} ? $_[0]->attributes->{Scheme}[0] : undef; +} + sub list_extra_info { my $self = shift; return { - Args => $self->attributes->{Args}[0], + Args => exists $self->attributes->{Args} ? $self->attributes->{Args}[0] : undef, CaptureArgs => $self->number_of_captures, } } @@ -127,7 +131,7 @@ and so on. This determines how the action is dispatched to. =head2 class Returns the name of the component where this action is defined. -Derived by calling the L +Derived by calling the L method on each component. =head2 code @@ -192,6 +196,10 @@ Returns the number of captures this action expects for L