tests: 000-load-deps: bail out when dependencies are not found, test more of them

This should be a better hint for people who forgot to install the
testsuite dependencies :).
This commit is contained in:
Michael Stapelberg 2012-11-13 21:03:44 +01:00
parent a3324a5e42
commit 5fb9b8ffb8
1 changed files with 16 additions and 4 deletions

View File

@ -1,10 +1,22 @@
#!perl
# vim:ts=4:sw=4:expandtab
use Test::More tests => 2;
use Test::More;
BEGIN {
use_ok( 'X11::XCB::Connection' );
use_ok( 'X11::XCB::Window' );
my @deps = qw(
X11::XCB::Connection
X11::XCB::Window
AnyEvent
AnyEvent::I3
IPC::Run
ExtUtils::PkgConfig
Inline
Test::More
);
for my $dep (@deps) {
use_ok($dep) or BAIL_OUT(qq|The Perl module "$dep" could not be loaded. Please see http://build.i3wm.org/docs/testsuite.html#_installing_the_dependencies|);
}
}
diag( "Testing i3, Perl $], $^X" );
done_testing;