X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2FCatalyst-Engine-Stomp.t;h=9c4f1482ade219ffb5fed356dfedd736e90af45b;hb=6ac87378371b9d19564a03b8c2183e14fa653d97;hp=0739f29422e128d9acad898cf7129e9caca6e899;hpb=a6b86b3548d5760e16a5d5131024ca093cda1a62;p=catagits%2FCatalyst-Engine-STOMP.git diff --git a/t/Catalyst-Engine-Stomp.t b/t/Catalyst-Engine-Stomp.t index 0739f29..9c4f148 100644 --- a/t/Catalyst-Engine-Stomp.t +++ b/t/Catalyst-Engine-Stomp.t @@ -8,6 +8,15 @@ use Net::Stomp; use YAML::XS qw/ Dump Load /; use Data::Dumper; +use Alien::ActiveMQ; +my $ACTIVEMQ_VERSION = '5.2.0'; + +unless (Alien::ActiveMQ->is_version_installed($ACTIVEMQ_VERSION)) { + plan 'skip_all' => 'No ActiveMQ server installed by Alien::ActiveMQ, try running the "install-activemq" command'; + exit; +} +my $mq = Alien::ActiveMQ->run_server($ACTIVEMQ_VERSION); + my $stomp; eval { $stomp = Net::Stomp->new( { hostname => 'localhost', port => 61613 } ); @@ -23,11 +32,11 @@ else { # First fire off the server $SIG{CHLD} = 'IGNORE'; unless (fork()) { - system("CATALYST_DEBUG=0 $^X -Ilib -Itestapp/lib testapp/script/testapp_stomp.pl --oneshot"); + system("$^X -Ilib -Itestapp/lib testapp/script/stomptestapp_stomp.pl --oneshot"); exit 0; } print STDERR "server started, waiting for spinup..."; -sleep 10; +sleep 20; # Now be a client to that server print STDERR "testing\n";