Commit | Line | Data |
---|---|---|
a78e3fed | 1 | use strict; |
2 | use lib qw( ./t ); | |
3 | use dbixcl_common_tests; | |
4 | ||
5 | eval { require DBD::SQLite }; | |
6 | my $class = $@ ? 'SQLite2' : 'SQLite'; | |
7 | ||
8 | { | |
9 | my $tester = dbixcl_common_tests->new( | |
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 | } |