$class->_plugins( {} ) unless $class->_plugins;
$plugins ||= [];
-
+
my @plugins = Catalyst::Utils::resolve_namespace($class . '::Plugin', 'Catalyst::Plugin', @$plugins);
for my $plugin ( reverse @plugins ) {
Method which adds the namespace for plugins and actions.
__PACKAGE__->setup(qw(MyPlugin));
-
+
# will load Catalyst::Plugin::MyPlugin
=cut
my $appnamespace = shift;
my $namespace = shift;
my @classes = @_;
- return String::RewritePrefix->rewrite(
- { '' => $namespace.'::', '+' => '', '~' => $appnamespace . '::' }, @classes,
- );
+ return String::RewritePrefix->rewrite({
+ q[] => qq[${namespace}::],
+ q[+] => q[],
+ (defined $appnamespace
+ ? (q[~] => qq[${appnamespace}::])
+ : ()
+ ),
+ }, @classes);
}
'Content is a serialized Catalyst::Request'
);
}
-
+
{
ok( my $response = request('http://localhost/action_action_five'),
'Request' );
'Content is a serialized Catalyst::Request'
);
}
-
{
ok( my $response = request('http://localhost/action_action_six'),