From 424768b20deaa345499363cc5050a77ce654c324 Mon Sep 17 00:00:00 2001 From: Wolfram Schneider Date: Wed, 14 Aug 2013 13:07:08 +0200 Subject: [PATCH] skip test if no zebra is running on localhost:8018 We need this for jenkins regression tests --- t/ZOOM-IRSpy.t | 15 +++++++++++---- 1 file changed, 11 insertions(+), 4 deletions(-) diff --git a/t/ZOOM-IRSpy.t b/t/ZOOM-IRSpy.t index 7d05d2d..6d84abc 100644 --- a/t/ZOOM-IRSpy.t +++ b/t/ZOOM-IRSpy.t @@ -1,12 +1,19 @@ # change 'tests => 1' to 'tests => last_test_to_print'; -use Test::More tests => 3; - BEGIN { - use lib './lib'; - use_ok('ZOOM::IRSpy'); + system( "zoomsh", "-e", "open localhost:8018", "quit" ); + if ($?) { + print "1..0 # skip no zebra running on localhost:8018\n"; + exit; + } } +use Test::More +use lib './lib'; +use_ok('ZOOM::IRSpy'); + +plan tests => 3; + # Insert your test code below, the Test::More module is use()ed here so read # its man page ( perldoc Test::More ) for help writing this test script. -- 1.7.10.4