Commit | Line | Data |
---|---|---|
9a95164d | 1 | use strict; |
2 | use lib qw(t/lib); | |
3 | use dbixcsl_common_tests; | |
4 | ||
5 | eval { require DBD::SQLite }; | |
6 | my $class = $@ ? 'SQLite2' : 'SQLite'; | |
7 | ||
8 | { | |
9 | my $tester = dbixcsl_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 | ); | |
16 | ||
17 | $tester->run_tests(); | |
18 | } | |
19 | ||
20 | END { | |
21 | unlink './t/sqlite_test'; | |
22 | } |