X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2FCatalyst-Engine-Stomp.t;fp=t%2FCatalyst-Engine-Stomp.t;h=0739f29422e128d9acad898cf7129e9caca6e899;hb=a6b86b3548d5760e16a5d5131024ca093cda1a62;hp=0145e28191cb33333e684ffc2388c76436b211f9;hpb=fa1e564eedaeaa045d243f573b86db4437ba14a6;p=catagits%2FCatalyst-Engine-STOMP.git

diff --git a/t/Catalyst-Engine-Stomp.t b/t/Catalyst-Engine-Stomp.t
index 0145e28..0739f29 100644
--- a/t/Catalyst-Engine-Stomp.t
+++ b/t/Catalyst-Engine-Stomp.t
@@ -23,13 +23,14 @@ else {
 # First fire off the server
 $SIG{CHLD} = 'IGNORE';
 unless (fork()) {
-	system("$^X -Ilib -Itestapp/lib testapp/script/testapp_stomp.pl --oneshot");
+	system("CATALYST_DEBUG=0 $^X -Ilib -Itestapp/lib testapp/script/testapp_stomp.pl --oneshot");
 	exit 0;
 }
-sleep 30;
+print STDERR "server started, waiting for spinup...";
+sleep 10;
 
 # Now be a client to that server
-
+print STDERR "testing\n";
 ok($stomp, 'Net::Stomp object');
 
 my $frame = $stomp->connect();