X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F10_04db2_common.t;h=34e176aa7296155e50412f91fefca77dc07c39f0;hb=ecf22f0ae0e0f639c0fc8dad9529a66b9374bfbd;hp=e0804b882fb7095224a6ebdacb5bb2e5f9862ec9;hpb=075473b9d1011fd8543989000a788f3d25015734;p=dbsrgits%2FDBIx-Class-Schema-Loader.git diff --git a/t/10_04db2_common.t b/t/10_04db2_common.t index e0804b8..34e176a 100644 --- a/t/10_04db2_common.t +++ b/t/10_04db2_common.t @@ -4,6 +4,7 @@ use Test::More; use Test::Exception; use Try::Tiny; use File::Path 'rmtree'; +use DBIx::Class::Optional::Dependencies; use DBIx::Class::Schema::Loader 'make_schema_at'; use lib qw(t/lib); @@ -20,6 +21,9 @@ my $password = $ENV{DBICTEST_DB2_PASS} || ''; plan skip_all => 'You need to set the DBICTEST_DB2_DSN, _USER, and _PASS environment variables' unless ($dsn && $user); +plan skip_all => 'You need to install ' . DBIx::Class::Optional::Dependencies->req_missing_for ('rdbms_db2') + unless DBIx::Class::Optional::Dependencies->req_ok_for ('rdbms_db2'); + my ($schema, $schemas_created); # for cleanup in END for extra tests my $srv_ver = do { @@ -148,7 +152,7 @@ my $tester = dbixcsl_common_tests->new( } catch { $schemas_created = 0; - skip "no CREATE SCHEMA privileges", 28 * 2; + skip "no CREATE SCHEMA privileges", 30 * 2; }; $dbh->do(<<"EOF");