From: Chris Andrews <chris@nodnol.org>
Date: Fri, 15 May 2009 20:36:35 +0000 (+0100)
Subject: Add some feedback to the test; shorten spinup delay.
X-Git-Tag: 0.03~10
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?p=catagits%2FCatalyst-Engine-STOMP.git;a=commitdiff_plain;h=a6b86b3548d5760e16a5d5131024ca093cda1a62

Add some feedback to the test; shorten spinup delay.
---

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();