Commit | Line | Data |
---|---|---|
a78e3fed | 1 | use strict; |
2 | use lib qw( ./t ); | |
fbd83464 | 3 | use dbixcsl_common_tests; |
a78e3fed | 4 | |
5 | eval { require DBD::SQLite }; | |
6 | my $class = $@ ? 'SQLite2' : 'SQLite'; | |
7 | ||
8 | { | |
fbd83464 | 9 | my $tester = dbixcsl_common_tests->new( |
a78e3fed | 10 | vendor => 'SQLite', |
11 | auto_inc_pk => 'INTEGER NOT NULL PRIMARY KEY', | |
12 | dsn => "dbi:$class:dbname=./t/sqlite_test", | |
13 | user => '', | |
14 | password => '', | |
15 | multi_fk_broken => 1, | |
16 | ); | |
17 | ||
18 | $tester->run_tests(); | |
19 | } | |
20 | ||
21 | END { | |
22 | unlink './t/sqlite_test'; | |
23 | } |