minor documentation fix for handle_request
[catagits/Catalyst-Runtime.git] / t / lib / PluginTestApp.pm
CommitLineData
052a2d89 1package PluginTestApp;
2use Test::More;
3
4use Catalyst qw(
5 Test::Plugin
6 +TestApp::Plugin::FullyQualified
7 );
8
052a2d89 9sub _test_plugins {
10 my $c = shift;
11 is_deeply [ $c->registered_plugins ],
12 [
13 qw/Catalyst::Plugin::Test::Plugin
14 TestApp::Plugin::FullyQualified/
15 ],
16 '... and it should report the correct plugins';
17 ok $c->registered_plugins('Catalyst::Plugin::Test::Plugin'),
18 '... or if we have a particular plugin';
19 ok $c->registered_plugins('Test::Plugin'),
20 '... even if it is not fully qualified';
21 ok !$c->registered_plugins('No::Such::Plugin'),
22 '... and it should return false if the plugin does not exist';
23}
24
25__PACKAGE__->setup;