X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FCatalyst%2FDispatcher.pm;h=cb019340dfe65c23342ab3c859eea8db7945232d;hb=6f2a2de7197da36913c829e5491bd0ddebc5e335;hp=3d43f9c331d439222ed20df7c5b43b81b21b33b1;hpb=016373e66232c6862ae37037e06735bd39f3894f;p=catagits%2FCatalyst-Runtime.git diff --git a/lib/Catalyst/Dispatcher.pm b/lib/Catalyst/Dispatcher.pm index 3d43f9c..cb01934 100644 --- a/lib/Catalyst/Dispatcher.pm +++ b/lib/Catalyst/Dispatcher.pm @@ -209,6 +209,7 @@ sub get_action { push @results, [$result] if $result; my $visitor = Tree::Simple::Visitor::FindByPath->new; + SEARCH: for my $part ( split '/', $namespace ) { $visitor->setSearchPath($part); $parent->accept($visitor); @@ -216,7 +217,12 @@ sub get_action { my $uid = $child->getUID if $child; my $match = $c->actions->{private}->{$uid}->{$action} if $uid; push @results, [$match] if $match; - $parent = $child if $child; + if ($child) { + $parent = $child; + } + else { + last SEARCH; + } } }