Commit | Line | Data |
3748b7c5 |
1 | use DBIx::Class::Schema::Loader::Optional::Dependencies |
2 | -skip_all_without => 'test_rdbms_firebird'; |
3 | |
4cbddf8d |
4 | use strict; |
3a89a69f |
5 | use warnings; |
ff4b0152 |
6 | use DBIx::Class::Schema::Loader::Utils qw/sigwarn_silencer/; |
3748b7c5 |
7 | use lib 't/lib'; |
5111e5d0 |
8 | |
3748b7c5 |
9 | use dbixcsl_firebird_tests; |
3a89a69f |
10 | |
3748b7c5 |
11 | { |
12 | # get rid of stupid warning from Firebird/GetInfo.pm |
13 | local $SIG{__WARN__} = sigwarn_silencer( |
14 | qr{^(?:Argument "[0-9_]+" isn't numeric|Missing argument) in sprintf at \S+DBD/Firebird/GetInfo.pm line \d+\.$} |
15 | ); |
16 | require DBD::Firebird::GetInfo; |
17 | } |
c76ebcc7 |
18 | |
3748b7c5 |
19 | my %conninfo; |
20 | @conninfo{qw(dsn user password)} = map { $ENV{"DBICTEST_FIREBIRD_$_"} } qw(DSN USER PASS); |
5111e5d0 |
21 | |
3748b7c5 |
22 | dbixcsl_firebird_tests->new( |
23 | %conninfo, |
24 | connect_info_opts => { |
25 | on_connect_call => 'use_softcommit', |
3a89a69f |
26 | }, |
3748b7c5 |
27 | )->run_tests; |
3a89a69f |
28 | |
e32d24a5 |
29 | # vim:et sts=4 sw=4 tw=0: |