-package # PAUSE hide
- Catalyst::Test::MessageDriven;
+package CatalystX::Test::MessageDriven;
use Class::MOP;
use Sub::Exporter;
use HTTP::Request;
=head1 NAME
-Catalyst::Test::MessageDriven - test message-driven Catalyst apps
+CatalystX::Test::MessageDriven - test message-driven Catalyst apps
=head1 DESCRIPTION
=head1 SYNOPSIS
- BEGIN { use_ok 'Catalyst::Test::MessageDriven', 'SomeApp' };
+ BEGIN { use_ok 'CatalystX::Test::MessageDriven', 'SomeApp' };
my $req = '... some message text ...';
my $queue = 'somequeue';
my $class = $args->{class};
if (!$class) {
- $request = sub { Catalyst::Exception->throw("Must specify a test app: use Catalyst::Test::MessageDriven 'TestApp'") };
+ $request = sub { Catalyst::Exception->throw("Must specify a test app: use CatalystX::Test::MessageDriven 'TestApp'") };
}
else {
unless (Class::MOP::is_class_loaded($class)) {
use lib "$FindBin::Bin/lib";
BEGIN {
- use_ok 'Catalyst::Test::MessageDriven', 'StompTestApp' or die;
+ use_ok 'CatalystX::Test::MessageDriven', 'StompTestApp' or die;
};
# successful request - type is minimum attributes