X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FDispatcher.pm;h=5fc33c0d1345135ffde317b01644b747e1d471ca;hp=e9ae03e20418b640981149fcdcefec7989753918;hb=684d10edf63074f94667d437db01d30b8d13cefc;hpb=261c571ec577304a8a41218a4576675c8099069a diff --git a/lib/Catalyst/Dispatcher.pm b/lib/Catalyst/Dispatcher.pm index e9ae03e..5fc33c0 100644 --- a/lib/Catalyst/Dispatcher.pm +++ b/lib/Catalyst/Dispatcher.pm @@ -206,7 +206,7 @@ sub get_action { return unless @match; - if ( my $action = $match[-1]->get_action( $name ) ) { + if ( my $action = $match[-1]->get_action($name) ) { return $action if $action->namespace eq $namespace; } } @@ -223,7 +223,7 @@ sub get_actions { my @match = $self->get_containers($namespace); - return map { $_->get_action( $action ) } @match; + return map { $_->get_action($action) } @match; } =item $self->get_containers( $namespace ) @@ -361,7 +361,11 @@ sub setup_actions { return unless $c->debug; - my $privates = Text::SimpleTable->new( [ 36, 'Private' ], [ 37, 'Class' ] ); + my $privates = Text::SimpleTable->new( + [ 24, 'Private' ], + [ 23, 'Class' ], + [ 23, 'Method' ] + ); my $has_private = 0; my $walker = sub { @@ -375,7 +379,7 @@ sub setup_actions { next if ( ( $action =~ /^_.*/ ) && ( !$c->config->{show_internal_actions} ) ); - $privates->row( "$prefix$action", $action_obj->class ); + $privates->row( "$prefix$action", $action_obj->class, $action ); $has_private = 1; }