Switch the test harness module into CatalystX::, and allow it to

be indexed etc.

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 (file)
--- 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)) {

diff --git a/t/13_message-driven-request.t b/t/13_message-driven-request.t
index 7f21a53..a1ea8c3 100644 (file)
--- a/t/13_message-driven-request.t
+++ b/t/13_message-driven-request.t
@@ -6,7 +6,7 @@ use FindBin;
 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