X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst%2FDispatchType%2FDefault.pm;h=1c0d5bf4daf8e3b201d0c4e6d302badece612adb;hp=4825647bd40b615207110e17b244fdbd6cfbcdf6;hb=22f3a8dd32e5940d87a1d21642fa39c7813bc921;hpb=6b23994966a2a66b90986a51e7e1d71f62d90f44 diff --git a/lib/Catalyst/DispatchType/Default.pm b/lib/Catalyst/DispatchType/Default.pm index 4825647..1c0d5bf 100644 --- a/lib/Catalyst/DispatchType/Default.pm +++ b/lib/Catalyst/DispatchType/Default.pm @@ -7,12 +7,15 @@ sub prepare_action { my ($self, $c, $path) = @_; return if $path =~ m!/!; # Not at root yet, wait for it ... my $result = @{$c->get_action('default', $c->req->path, 1) || []}[-1]; + # Find default on namespace or super if ($result) { $c->action( $result->[0] ); $c->namespace( $c->req->path ); $c->req->action('default'); $c->req->match(''); + return 1; } + return 0; } 1;