controller method on application, this one is identical to that one in Context -...

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

diff --git a/t/aggregate/unit_core_action_for.t b/t/aggregate/unit_core_action_for.t
index 3e75eaa..e3deb13 100644 (file)
--- a/t/aggregate/unit_core_action_for.t
+++ b/t/aggregate/unit_core_action_for.t
@@ -8,11 +8,11 @@ use lib "$FindBin::Bin/../lib";
 
 use Test::More;
 
-plan tests => 4;
+plan tests => 6;
 
 use_ok('TestApp');
 
-is(TestApp->action_for('global_action')->code, TestApp->can('global_action'),
+is(TestApp->action_for('global_action')->code, TestApp::Controller::Root->can('global_action'),
    'action_for on appclass ok');
 
 is(TestApp->controller('Args')->action_for('args')->code,
@@ -21,3 +21,12 @@ is(TestApp->controller('Args')->action_for('args')->code,
    is(TestApp->controller('Args')->action_for('args').'',
       'args/args',
       'action stringifies');
+
+my $controller = Catalyst::Context->new( application => TestApp->new )->controller('Args');
+is($controller->action_for('args')->code,
+    TestApp::Controller::Args->can('args'),
+    'action_for on controller ok');
+is($controller->action_for('args').'',
+    'args/args',
+    'action stringifies');
+