Optimized the path split a bit
Andy Grundman [Sat, 22 Oct 2005 18:04:34 +0000 (18:04 +0000)]
lib/Catalyst/DispatchType/Default.pm

index 9cd82bf..aa32f9d 100644 (file)
@@ -32,7 +32,7 @@ sub match {
         $c->namespace( $c->req->path );
         $c->req->action('default');
         # default methods receive the controller name as the first argument
-        unshift @{ $c->req->args }, ( split /\//, $result->[0] )[0];
+        unshift @{ $c->req->args }, ( split /\//, $result->[0], 2 )[0];
         $c->req->match('');
         return 1;
     }