X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Funit_controller_actions.t;h=26e603d6fd1b593b58d6a022a22a78e5d824fa99;hb=74cd30870630f5e7b43dd7768a2c3c13355f6019;hp=3ca705f1c1a6aa5e781ae82c0f8ede3c14cf09a2;hpb=0da2dc3044ed62182fd3cf515b26c852edaa11b4;p=catagits%2FCatalyst-Runtime.git diff --git a/t/unit_controller_actions.t b/t/unit_controller_actions.t index 3ca705f..26e603d 100644 --- a/t/unit_controller_actions.t +++ b/t/unit_controller_actions.t @@ -22,5 +22,5 @@ my $controller = TestController->new($app, {actions => { foo => { Path => '/some ok $controller->can('_controller_actions'); is_deeply $controller->_controller_actions => { foo => { Path => '/some/path' }}; is_deeply $controller->{actions} => { foo => { Path => '/some/path' }}; # Back compat. -is_deeply [ sort grep { ! /^_/ } $controller->get_action_methods ], [sort qw/action foo/]; +is_deeply [ sort grep { ! /^_/ } map { $_->name } $controller->get_action_methods ], [sort qw/action foo/];