#push @$args, @_;
local $c->request->{arguments} = $args;
- $action->execute($c);
+ $action->dispatch( $c );
return $c->state;
}
return $self->action_hash->{"$namespace/$name"};
}
-=head2 $self->get_action_by_path( $path );
+=head2 $self->get_action_by_path( $path );
+
+Returns the named action by its full path.
-returns the named action by it's full path.
-
-=cut
+=cut
sub get_action_by_path {
my ( $self, $path ) = @_;
my @containers;
- do {
- push @containers, $self->container_hash->{$namespace};
- } while ( $namespace =~ s#/[^/]+$## );
+ if ( length $namespace ) {
+ do {
+ push @containers, $self->container_hash->{$namespace};
+ } while ( $namespace =~ s#/[^/]+$## );
+ }
return reverse grep { defined } @containers, $self->container_hash->{''};
my $privates = Text::SimpleTable->new(
[ 20, 'Private' ],
- [ 38, 'Class' ],
+ [ 36, 'Class' ],
[ 12, 'Method' ]
);