main test script gives up if gnuplot isn't available

This commit is contained in:
Dima Kogan 2013-10-20 00:23:03 -07:00
parent f342a42cf9
commit 46123fc308

View File

@ -13,6 +13,12 @@ BEGIN {
print("1..0 # Skip: Perl not compiled with 'useithreads'\n"); print("1..0 # Skip: Perl not compiled with 'useithreads'\n");
exit(0); exit(0);
} }
unless( open( my $pipe, '|-', 'gnuplot' ))
{
print("1..0 # Skip: gnuplot not installed. This is required for feedgnuplot to be useful\n");
exit(0);
}
} }
use Test::More tests => 52; use Test::More tests => 52;