use inlined module hiding in tests

[catagits/Catalyst-Runtime.git] / t / aggregate / live_component_controller_action_index.t

diff --git a/t/aggregate/live_component_controller_action_index.t b/t/aggregate/live_component_controller_action_index.t
index 99e9435..48c6ec7 100644 (file)
--- a/t/aggregate/live_component_controller_action_index.t
+++ b/t/aggregate/live_component_controller_action_index.t
@@ -1,5 +1,3 @@
-#!perl
-
 use strict;
 use warnings;
 
@@ -27,71 +25,71 @@ sub run_tests {
     # test root index
     {
         my @expected = qw[
-          TestApp->index
-          TestApp->end
+          TestApp::Controller::Root->index
+          TestApp::Controller::Root->end
         ];
-    
+
         my $expected = join( ", ", @expected );
         ok( my $response = request('http://localhost/'), 'root index' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
         is( $response->content, 'root index', 'root index ok' );
-        
+
         ok( $response = request('http://localhost'), 'root index no slash' );
         is( $response->content, 'root index', 'root index no slash ok' );
     }
-    
+
     # test first-level controller index
     {
         my @expected = qw[
           TestApp::Controller::Index->index
-          TestApp->end
+          TestApp::Controller::Root->end
         ];
-    
+
         my $expected = join( ", ", @expected );
-        
+
         ok( my $response = request('http://localhost/index/'), 'first-level controller index' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
         is( $response->content, 'Index index', 'first-level controller index ok' );
-        
+
         ok( $response = request('http://localhost/index'), 'first-level controller index no slash' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
-        is( $response->content, 'Index index', 'first-level controller index no slash ok' );        
-    }    
-    
+        is( $response->content, 'Index index', 'first-level controller index no slash ok' );
+    }
+
     # test second-level controller index
     {
         my @expected = qw[
           TestApp::Controller::Action::Index->begin
           TestApp::Controller::Action::Index->index
-          TestApp->end
+          TestApp::Controller::Root->end
         ];
-    
+
         my $expected = join( ", ", @expected );
-        
+
         ok( my $response = request('http://localhost/action/index/'), 'second-level controller index' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
         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->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );
-        is( $response->content, 'Action-Index index', 'second-level controller index no slash ok' );        
+        is( $response->content, 'Action-Index index', 'second-level controller index no slash ok' );
     }
-    
+
     # test controller default when index is present
     {
         my @expected = qw[
           TestApp::Controller::Action::Index->begin
           TestApp::Controller::Action::Index->default
-          TestApp->end
+          TestApp::Controller::Root->end
         ];
-    
+
         my $expected = join( ", ", @expected );
-        
+
         ok( my $response = request('http://localhost/action/index/foo'), 'default with index' );
         is( $response->header('X-Catalyst-Executed'),
             $expected, 'Executed actions' );