X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Faggregate%2Funit_core_action_for.t;h=e3deb1322adddd47882a37c7a699da8948fdc825;hb=75513d89c0f461d9ac3a678ef6c2321aefdc98cb;hp=c0af9d3caf13acb85be1d42924af0f76590f64e0;hpb=a07fc0d907345eabf7e3aa780c7e666f67c898e4;p=catagits%2FCatalyst-Runtime.git diff --git a/t/aggregate/unit_core_action_for.t b/t/aggregate/unit_core_action_for.t index c0af9d3..e3deb13 100644 --- a/t/aggregate/unit_core_action_for.t +++ b/t/aggregate/unit_core_action_for.t @@ -8,7 +8,7 @@ use lib "$FindBin::Bin/../lib"; use Test::More; -plan tests => 4; +plan tests => 6; use_ok('TestApp'); @@ -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'); +