+use DBIx::Class::Schema::Loader::Optional::Dependencies
+ -skip_all_without => 'test_rdbms_db2';
+
use strict;
use warnings;
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);
my $user = $ENV{DBICTEST_DB2_USER} || '';
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 {
'dbclob' => { data_type => 'dbclob' },
};
-my $tester = dbixcsl_common_tests->new(
+dbixcsl_common_tests->new(
vendor => 'DB2',
auto_inc_pk => 'INTEGER GENERATED BY DEFAULT AS IDENTITY NOT NULL PRIMARY KEY',
dsn => $dsn,
}
catch {
$schemas_created = 0;
- skip "no CREATE SCHEMA privileges", 28 * 2;
+ skip "no CREATE SCHEMA privileges", 30 * 2;
};
$dbh->do(<<"EOF");
},
},
-);
-
-$tester->run_tests();
+)->run_tests();
END {
if (not $ENV{SCHEMA_LOADER_TESTS_NOCLEANUP}) {