X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Runtime.git;a=blobdiff_plain;f=lib%2FCatalyst.pm;h=0ba2c4dfd68de89c8a8bc2c08a8222c54f21927d;hp=0e28659e645583f7c998d8c3b1fce4511aa7e5af;hb=18339b159f0d0dd7c057a3f959c30f4777bb4f91;hpb=eeca49a9404fcd2eb90bb6ad7e4146c3a7af3520

diff --git a/lib/Catalyst.pm b/lib/Catalyst.pm
index 0e28659..0ba2c4d 100644
--- a/lib/Catalyst.pm
+++ b/lib/Catalyst.pm
@@ -54,7 +54,7 @@ __PACKAGE__->engine_class('Catalyst::Engine::CGI');
 __PACKAGE__->request_class('Catalyst::Request');
 __PACKAGE__->response_class('Catalyst::Response');
 
-our $VERSION = '5.49_04';
+our $VERSION = '5.49_05';
 
 sub import {
     my ( $class, @arguments ) = @_;
@@ -116,10 +116,6 @@ Catalyst - The Elegant MVC Web Application Framework
     # called for /bar/of/soap, /bar/of/soap/10, etc.
     sub bar : Path('/bar/of/soap') { ... }
 
-    # called for / and only /, no other args
-    sub baz : Path  { ... } 
-    sub baz : Index { ... }
-
     # called for all actions, from the top-most controller inwards
     sub auto : Private { 
         my ( $self, $c ) = @_;
@@ -142,8 +138,11 @@ Catalyst - The Elegant MVC Web Application Framework
     # called for /foo/bar
     sub bar : Local { ... }
     
-    # overrides /foo, but not /foo/1, etc.
-    sub index : Path { ... }
+    # called for /blargle
+    sub blargle : Global { ... }
+    
+    # an index action matches /foo, but not /foo/1, etc.
+    sub index : Private { ... }
     
     ### in MyApp/Controller/Foo/Bar.pm
     # called for /foo/bar/baz
@@ -227,8 +226,6 @@ controller of the current action.
 
 Returns the current L<Catalyst::Request> object.
 
-    my $req = $c->req;
-
 =back
 
 =head2 Processing and response to the current request
@@ -300,8 +297,6 @@ sub error {
 
 Returns the current L<Catalyst::Response> object.
 
-    my $res = $c->res;
-
 =item $c->stash
 
 Returns a hashref to the stash, which may be used to store data and pass it
@@ -358,7 +353,8 @@ sub component {
 
         my @names = (
             $name, "${appclass}::${name}",
-            map { "${appclass}::${_}::${name}" } qw/M V C/
+            map { "${appclass}::${_}::${name}" } 
+	    qw/Model M Controller C View V/
         );
 
         foreach my $try (@names) {