Added a first-level controller index test, that passes

diff --git a/t/live/component/controller/action/index.t b/t/live/component/controller/action/index.t
index 738e422..35c397a 100644 (file)
--- a/t/live/component/controller/action/index.t
+++ b/t/live/component/controller/action/index.t
@@ -6,7 +6,7 @@ use warnings;
 use FindBin;
 use lib "$FindBin::Bin/../../../lib";
 
-use Test::More tests => 10;
+use Test::More tests => 14;
 use Catalyst::Test 'TestApp';
     
 for ( 1 .. 1 ) {
@@ -19,13 +19,22 @@ for ( 1 .. 1 ) {
         is( $response->content, 'root index', 'root index no slash ok' );
     }
     
-    # test controller index
+    # test first-level controller index
     {
-        ok( my $response = request('http://localhost/action/index/'), 'controller index' );
-        is( $response->content, 'Action::Index index', 'controller index ok' );
+        ok( my $response = request('http://localhost/action/'), 'first-level controller index' );
+        is( $response->content, 'Action index', 'first-level controller index ok' );
         
-        ok( $response = request('http://localhost/action/index'), 'controller index no slash' );
-        is( $response->content, 'Action::Index index', 'controller index no slash ok' );        
+        ok( $response = request('http://localhost/action'), 'first-level controller index no slash' );
+        is( $response->content, 'Action index', 'first-level controller index no slash ok' );        
+    }    
+    
+    # test second-level controller index
+    {
+        ok( my $response = request('http://localhost/action/index/'), 'second-level controller index' );
+        is( $response->content, 'Action::Index index', 'second-level controller index ok' );
+        
+        ok( $response = request('http://localhost/action/index'), 'second-level controller index no slash' );
+        is( $response->content, 'Action::Index index', 'second-level controller index no slash ok' );        
     }
     
     # test controller default when index is present

diff --git a/t/live/lib/TestApp/Controller/Action.pm b/t/live/lib/TestApp/Controller/Action.pm
index acd8385..3352415 100644 (file)
--- a/t/live/lib/TestApp/Controller/Action.pm
+++ b/t/live/lib/TestApp/Controller/Action.pm
@@ -9,6 +9,11 @@ sub begin : Private {
     $c->response->content_type('text/plain; charset=utf-8');
 }
 
+sub index : Private {
+    my ( $self, $c ) = @_;
+    $c->res->body( 'Action index' );
+}
+
 sub default : Private {
     my ( $self, $c ) = @_;
     $c->res->output("Error - TestApp::Controller::Action\n");