Showing 2 changed files with 10 additions and 5 deletions
+3
t/common.t
... ...
@@ -3,6 +3,9 @@ use strict;
3 3
 use warnings;
4 4
 use DBIx::Custom;
5 5
 use Encode qw/encode_utf8/;
6
+use FindBin;
7
+use lib "$FindBin::Bin/common";
8
+
6 9
 
7 10
 my $dbi;
8 11
 
+7 -5
t/sqlite.t
... ...
@@ -4,7 +4,7 @@ use warnings;
4 4
 use utf8;
5 5
 use Encode qw/encode_utf8 decode_utf8/;
6 6
 use FindBin;
7
-use lib "$FindBin::Bin/basic";
7
+use lib "$FindBin::Bin/common";
8 8
 
9 9
 BEGIN {
10 10
     eval { require DBD::SQLite; 1 }
... ...
@@ -28,6 +28,8 @@ sub test { print "# $_[0]\n" }
28 28
 my $create_table1 = 'create table table1 (key1 char(255), key2 char(255));';
29 29
 my $create_table1_2 = 'create table table1 (key1 char(255), key2 char(255), key3 char(255), key4 char(255), key5 char(255));';
30 30
 my $create_table2 = 'create table table2 (key1 char(255), key3 char(255));';
31
+my $create_table2_2 = "create table table2 (key1, key2, key3)";
32
+my $create_table3 = "create table table3 (key1, key2, key3)";
31 33
 my $create_table_reserved = 'create table "table" ("select", "update")';
32 34
 
33 35
 my $q = '"';
... ...
@@ -545,8 +547,8 @@ eval { $dbi->execute('drop table table1') };
545 547
 eval { $dbi->execute('drop table table2') };
546 548
 eval { $dbi->execute('drop table table3') };
547 549
 $dbi->execute($create_table1_2);
548
-$dbi->execute("create table table2 (key1, key2, key3)");
549
-$dbi->execute("create table table3 (key1, key2, key3)");
550
+$dbi->execute($create_table2_2);
551
+$dbi->execute($create_table3);
550 552
 $dbi->insert(table => 'table1', param => {key1 => 1, key2 => 2, key3 => 3});
551 553
 $dbi->model('table1')->delete_at(where => [1, 2]);
552 554
 is_deeply($dbi->select(table => 'table1')->all, []);
... ...
@@ -1435,8 +1437,8 @@ eval { $dbi->execute('drop table table1') };
1435 1437
 eval { $dbi->execute('drop table table2') };
1436 1438
 eval { $dbi->execute('drop table table3') };
1437 1439
 $dbi->execute($create_table1_2);
1438
-$dbi->execute("create table table2 (key1, key2, key3)");
1439
-$dbi->execute("create table table3 (key1, key2, key3)");
1440
+$dbi->execute($create_table2_2);
1441
+$dbi->execute($create_table3);
1440 1442
 $dbi->insert(table => 'table1', param => {key1 => 1, key2 => 2, key3 => 3});
1441 1443
 $dbi->model('table1')->delete(id => [1, 2]);
1442 1444
 is_deeply($dbi->select(table => 'table1')->all, []);