X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Engine-STOMP.git;a=blobdiff_plain;f=lib%2FCatalystX%2FTest%2FMessageDriven.pm;fp=t%2Flib%2FCatalyst%2FTest%2FMessageDriven.pm;h=281e7bc181eafc6e8b627cefe93dab368cd562ab;hp=db50c2b131fec13dd04a10ba7503b613842bbc5c;hb=28e4d6b3312198d2d39f542c28a46beafeb8b7cb;hpb=ccd9e8faf259e0a35e45876b9837765c25ee766a diff --git a/t/lib/Catalyst/Test/MessageDriven.pm b/lib/CatalystX/Test/MessageDriven.pm similarity index 89% rename from t/lib/Catalyst/Test/MessageDriven.pm rename to lib/CatalystX/Test/MessageDriven.pm index db50c2b..281e7bc 100644 --- a/t/lib/Catalyst/Test/MessageDriven.pm +++ b/lib/CatalystX/Test/MessageDriven.pm @@ -1,5 +1,4 @@ -package # PAUSE hide - Catalyst::Test::MessageDriven; +package CatalystX::Test::MessageDriven; use Class::MOP; use Sub::Exporter; use HTTP::Request; @@ -10,7 +9,7 @@ BEGIN { =head1 NAME -Catalyst::Test::MessageDriven - test message-driven Catalyst apps +CatalystX::Test::MessageDriven - test message-driven Catalyst apps =head1 DESCRIPTION @@ -21,7 +20,7 @@ run with Catalyst::Engine::Stomp. =head1 SYNOPSIS - BEGIN { use_ok 'Catalyst::Test::MessageDriven', 'SomeApp' }; + BEGIN { use_ok 'CatalystX::Test::MessageDriven', 'SomeApp' }; my $req = '... some message text ...'; my $queue = 'somequeue'; @@ -63,7 +62,7 @@ my $build_exports = sub { 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)) {