| ... | ... | 
                  @@ -4,7 +4,7 @@ use warnings;  | 
              
| 4 | 4 | 
                  use utf8;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 6 | 
                  use FindBin;  | 
              
| 7 | 
                  -use DBIx::Custom::Next;  | 
              |
| 7 | 
                  +use DBIx::Custom;  | 
              |
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                  my $dbi;  | 
              
| 10 | 10 | 
                  my $dsn;  | 
              
| ... | ... | 
                  @@ -14,7 +14,7 @@ my $database = "$FindBin::Bin/access.mdb";  | 
              
| 14 | 14 | 
                  $dsn = "dbi:ODBC:driver=Microsoft Access Driver (*.mdb);dbq=$database";  | 
              
| 15 | 15 | 
                   | 
              
| 16 | 16 | 
                  plan skip_all => 'Microsoft access(ODBC, *.mdb) private test' unless -f "$FindBin::Bin/run/access.run"  | 
              
| 17 | 
                  -  && eval { $dbi = DBIx::Custom::Next->connect(dsn => $dsn); 1 };
                 | 
              |
| 17 | 
                  +  && eval { $dbi = DBIx::Custom->connect(dsn => $dsn); 1 };
                 | 
              |
| 18 | 18 | 
                  plan 'no_plan';  | 
              
| 19 | 19 | 
                   | 
              
| 20 | 20 | 
                  my $model;  | 
              
| ... | ... | 
                  @@ -4,7 +4,7 @@ use warnings;  | 
              
| 4 | 4 | 
                  use utf8;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 6 | 
                  use FindBin;  | 
              
| 7 | 
                  -use DBIx::Custom::Next;  | 
              |
| 7 | 
                  +use DBIx::Custom;  | 
              |
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                  my $dbi;  | 
              
| 10 | 10 | 
                  my $dsn;  | 
              
| ... | ... | 
                  @@ -14,7 +14,7 @@ $dsn = "dbi:ODBC:Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=$database
                 | 
              
| 14 | 14 | 
                   | 
              
| 15 | 15 | 
                  plan skip_all => 'Microsoft access(ODBC, *.accdb(2007)) private test'  | 
              
| 16 | 16 | 
                  unless -f "$FindBin::Bin/run/access2007-accdb.run"  | 
              
| 17 | 
                  -      && eval { $dbi = DBIx::Custom::Next->connect(dsn => $dsn); 1 };
                 | 
              |
| 17 | 
                  +      && eval { $dbi = DBIx::Custom->connect(dsn => $dsn); 1 };
                 | 
              |
| 18 | 18 | 
                  plan 'no_plan';  | 
              
| 19 | 19 | 
                   | 
              
| 20 | 20 | 
                  my $model;  | 
              
| ... | ... | 
                  @@ -4,7 +4,7 @@ use warnings;  | 
              
| 4 | 4 | 
                  use utf8;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 6 | 
                  use FindBin;  | 
              
| 7 | 
                  -use DBIx::Custom::Next;  | 
              |
| 7 | 
                  +use DBIx::Custom;  | 
              |
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                  my $dbi;  | 
              
| 10 | 10 | 
                  my $dsn;  | 
              
| ... | ... | 
                  @@ -14,7 +14,7 @@ $dsn = "dbi:ODBC:Driver={Microsoft Access Driver (*.mdb, *.accdb)};DBQ=$database
                 | 
              
| 14 | 14 | 
                   | 
              
| 15 | 15 | 
                  plan skip_all => 'Microsoft access(ODBC, *.accdb(2010)) private test'  | 
              
| 16 | 16 | 
                  unless -f "$FindBin::Bin/run/access2010-accdb.run"  | 
              
| 17 | 
                  -      && eval { $dbi = DBIx::Custom::Next->connect(dsn => $dsn); 1 };
                 | 
              |
| 17 | 
                  +      && eval { $dbi = DBIx::Custom->connect(dsn => $dsn); 1 };
                 | 
              |
| 18 | 18 | 
                  plan 'no_plan';  | 
              
| 19 | 19 | 
                   | 
              
| 20 | 20 | 
                  my $model;  | 
              
| ... | ... | 
                  @@ -9,9 +9,9 @@ $ENV{DBIX_CUSTOM_SKIP_MESSAGE} = 'mysql private test';
                 | 
              
| 9 | 9 | 
                   | 
              
| 10 | 10 | 
                   | 
              
| 11 | 11 | 
                   | 
              
| 12 | 
                  -use DBIx::Custom::Next;  | 
              |
| 12 | 
                  +use DBIx::Custom;  | 
              |
| 13 | 13 | 
                   {
                 | 
              
| 14 | 
                  - package DBIx::Custom::Next;  | 
              |
| 14 | 
                  + package DBIx::Custom;  | 
              |
| 15 | 15 | 
                  no warnings 'redefine';  | 
              
| 16 | 16 | 
                   | 
              
| 17 | 17 | 
                  my $table1 = 'table1';  | 
              
| ... | ... | 
                  @@ -7,9 +7,9 @@ $ENV{DBIX_CUSTOM_TEST_RUN} = 1
                 | 
              
| 7 | 7 | 
                  if -f "$FindBin::Bin/run/common-oracle.run";  | 
              
| 8 | 8 | 
                   $ENV{DBIX_CUSTOM_SKIP_MESSAGE} = 'oracle private test';
                 | 
              
| 9 | 9 | 
                   | 
              
| 10 | 
                  -use DBIx::Custom::Next;  | 
              |
| 10 | 
                  +use DBIx::Custom;  | 
              |
| 11 | 11 | 
                   {
                 | 
              
| 12 | 
                  - package DBIx::Custom::Next;  | 
              |
| 12 | 
                  + package DBIx::Custom;  | 
              |
| 13 | 13 | 
                  no warnings 'redefine';  | 
              
| 14 | 14 | 
                   | 
              
| 15 | 15 | 
                       has option => sub {
                 | 
              
| ... | ... | 
                  @@ -7,9 +7,9 @@ $ENV{DBIX_CUSTOM_TEST_RUN} = 1
                 | 
              
| 7 | 7 | 
                  if -f "$FindBin::Bin/run/common-postgresql.run";  | 
              
| 8 | 8 | 
                   $ENV{DBIX_CUSTOM_SKIP_MESSAGE} = 'postgresql private test';
                 | 
              
| 9 | 9 | 
                   | 
              
| 10 | 
                  -use DBIx::Custom::Next;  | 
              |
| 10 | 
                  +use DBIx::Custom;  | 
              |
| 11 | 11 | 
                   {
                 | 
              
| 12 | 
                  - package DBIx::Custom::Next;  | 
              |
| 12 | 
                  + package DBIx::Custom;  | 
              |
| 13 | 13 | 
                  no warnings 'redefine';  | 
              
| 14 | 14 | 
                   | 
              
| 15 | 15 | 
                  my $table1 = 'table1';  | 
              
| ... | ... | 
                  @@ -5,9 +5,9 @@ use FindBin;  | 
              
| 5 | 5 | 
                  use lib "$FindBin::Bin/common";  | 
              
| 6 | 6 | 
                   $ENV{DBIX_CUSTOM_TEST_RUN} = 1;
                 | 
              
| 7 | 7 | 
                   | 
              
| 8 | 
                  -use DBIx::Custom::Next;  | 
              |
| 8 | 
                  +use DBIx::Custom;  | 
              |
| 9 | 9 | 
                   {
                 | 
              
| 10 | 
                  - package DBIx::Custom::Next;  | 
              |
| 10 | 
                  + package DBIx::Custom;  | 
              |
| 11 | 11 | 
                  no warnings 'redefine';  | 
              
| 12 | 12 | 
                   | 
              
| 13 | 13 | 
                  my $table1 = 'table1';  | 
              
| ... | ... | 
                  @@ -5,9 +5,9 @@ use FindBin;  | 
              
| 5 | 5 | 
                  use lib "$FindBin::Bin/common";  | 
              
| 6 | 6 | 
                   $ENV{DBIX_CUSTOM_TEST_RUN} = 1;
                 | 
              
| 7 | 7 | 
                   | 
              
| 8 | 
                  -use DBIx::Custom::Next;  | 
              |
| 8 | 
                  +use DBIx::Custom;  | 
              |
| 9 | 9 | 
                   {
                 | 
              
| 10 | 
                  - package DBIx::Custom::Next;  | 
              |
| 10 | 
                  + package DBIx::Custom;  | 
              |
| 11 | 11 | 
                  no warnings 'redefine';  | 
              
| 12 | 12 | 
                   | 
              
| 13 | 13 | 
                  my $table1 = 'table1';  | 
              
| ... | ... | 
                  @@ -7,9 +7,9 @@ $ENV{DBIX_CUSTOM_TEST_RUN} = 1
                 | 
              
| 7 | 7 | 
                  if -f "$FindBin::Bin/run/common-sqlserver.run";  | 
              
| 8 | 8 | 
                   $ENV{DBIX_CUSTOM_SKIP_MESSAGE} = 'sqlserver private test';
                 | 
              
| 9 | 9 | 
                   | 
              
| 10 | 
                  -use DBIx::Custom::Next;  | 
              |
| 10 | 
                  +use DBIx::Custom;  | 
              |
| 11 | 11 | 
                   {
                 | 
              
| 12 | 
                  - package DBIx::Custom::Next;  | 
              |
| 12 | 
                  + package DBIx::Custom;  | 
              |
| 13 | 13 | 
                  no warnings 'redefine';  | 
              
| 14 | 14 | 
                   | 
              
| 15 | 15 | 
                  my $table1 = 'table1';  | 
              
| ... | ... | 
                  @@ -9,7 +9,7 @@ my $dbi;  | 
              
| 9 | 9 | 
                   | 
              
| 10 | 10 | 
                   plan skip_all => $ENV{DBIX_CUSTOM_SKIP_MESSAGE} || 'common.t is always skipped'
                 | 
              
| 11 | 11 | 
                     unless $ENV{DBIX_CUSTOM_TEST_RUN}
                 | 
              
| 12 | 
                  -    && eval { $dbi = DBIx::Custom::Next->connect; 1 };
                 | 
              |
| 12 | 
                  +    && eval { $dbi = DBIx::Custom->connect; 1 };
                 | 
              |
| 13 | 13 | 
                   | 
              
| 14 | 14 | 
                  plan 'no_plan';  | 
              
| 15 | 15 | 
                   | 
              
| ... | ... | 
                  @@ -88,7 +88,7 @@ require MyDBI1;  | 
              
| 88 | 88 | 
                  use strict;  | 
              
| 89 | 89 | 
                  use warnings;  | 
              
| 90 | 90 | 
                   | 
              
| 91 | 
                  - use base 'DBIx::Custom::Next';  | 
              |
| 91 | 
                  + use base 'DBIx::Custom';  | 
              |
| 92 | 92 | 
                   | 
              
| 93 | 93 | 
                       sub connect {
                 | 
              
| 94 | 94 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -106,7 +106,7 @@ require MyDBI1;  | 
              
| 106 | 106 | 
                  use strict;  | 
              
| 107 | 107 | 
                  use warnings;  | 
              
| 108 | 108 | 
                   | 
              
| 109 | 
                  - use base 'DBIx::Custom::Next::Model';  | 
              |
| 109 | 
                  + use base 'DBIx::Custom::Model';  | 
              |
| 110 | 110 | 
                   | 
              
| 111 | 111 | 
                  package MyModel2::table1;  | 
              
| 112 | 112 | 
                   | 
              
| ... | ... | 
                  @@ -174,7 +174,7 @@ require MyDBI1;  | 
              
| 174 | 174 | 
                  use strict;  | 
              
| 175 | 175 | 
                  use warnings;  | 
              
| 176 | 176 | 
                   | 
              
| 177 | 
                  - use base 'DBIx::Custom::Next';  | 
              |
| 177 | 
                  + use base 'DBIx::Custom';  | 
              |
| 178 | 178 | 
                   | 
              
| 179 | 179 | 
                       sub connect {
                 | 
              
| 180 | 180 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -185,7 +185,7 @@ require MyDBI1;  | 
              
| 185 | 185 | 
                   {
                 | 
              
| 186 | 186 | 
                  package MyDBI6;  | 
              
| 187 | 187 | 
                   | 
              
| 188 | 
                  - use base 'DBIx::Custom::Next';  | 
              |
| 188 | 
                  + use base 'DBIx::Custom';  | 
              |
| 189 | 189 | 
                   | 
              
| 190 | 190 | 
                       sub connect {
                 | 
              
| 191 | 191 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -198,7 +198,7 @@ require MyDBI1;  | 
              
| 198 | 198 | 
                   {
                 | 
              
| 199 | 199 | 
                  package MyDBI7;  | 
              
| 200 | 200 | 
                   | 
              
| 201 | 
                  - use base 'DBIx::Custom::Next';  | 
              |
| 201 | 
                  + use base 'DBIx::Custom';  | 
              |
| 202 | 202 | 
                   | 
              
| 203 | 203 | 
                       sub connect {
                 | 
              
| 204 | 204 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -212,7 +212,7 @@ require MyDBI1;  | 
              
| 212 | 212 | 
                   {
                 | 
              
| 213 | 213 | 
                  package MyDBI8;  | 
              
| 214 | 214 | 
                   | 
              
| 215 | 
                  - use base 'DBIx::Custom::Next';  | 
              |
| 215 | 
                  + use base 'DBIx::Custom';  | 
              |
| 216 | 216 | 
                   | 
              
| 217 | 217 | 
                       sub connect {
                 | 
              
| 218 | 218 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -226,7 +226,7 @@ require MyDBI1;  | 
              
| 226 | 226 | 
                   {
                 | 
              
| 227 | 227 | 
                  package MyDBI9;  | 
              
| 228 | 228 | 
                   | 
              
| 229 | 
                  - use base 'DBIx::Custom::Next';  | 
              |
| 229 | 
                  + use base 'DBIx::Custom';  | 
              |
| 230 | 230 | 
                   | 
              
| 231 | 231 | 
                       sub connect {
                 | 
              
| 232 | 232 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -248,7 +248,7 @@ $rows = $dbi->select(table => $table1)->all;  | 
              
| 248 | 248 | 
                   is_deeply($rows, [{$key1 => 1, $key2 => 2}, {$key1 => 1, $key2 => 2}]);
                 | 
              
| 249 | 249 | 
                   | 
              
| 250 | 250 | 
                  # Get user table info  | 
              
| 251 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 251 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 252 | 252 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 253 | 253 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 254 | 254 | 
                   eval { $dbi->execute("drop table $table3") };
                 | 
              
| ... | ... | 
                  @@ -258,14 +258,14 @@ $dbi->execute($create_table3);  | 
              
| 258 | 258 | 
                  $user_table_info = $dbi->get_table_info(exclude => $dbi->exclude_table);  | 
              
| 259 | 259 | 
                   | 
              
| 260 | 260 | 
                  # Create table  | 
              
| 261 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 261 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 262 | 262 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 263 | 263 | 
                  $dbi->execute($create_table1);  | 
              
| 264 | 264 | 
                  $model = $dbi->create_model(table => $table1);  | 
              
| 265 | 265 | 
                   $model->insert({$key1 => 1, $key2 => 2});
                 | 
              
| 266 | 266 | 
                   is_deeply($model->select->all, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 267 | 267 | 
                   | 
              
| 268 | 
                  -test 'DBIx::Custom::Next::Result test';  | 
              |
| 268 | 
                  +test 'DBIx::Custom::Result test';  | 
              |
| 269 | 269 | 
                  $dbi->delete_all(table => $table1);  | 
              
| 270 | 270 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| 271 | 271 | 
                   $dbi->insert({$key1 => 3, $key2 => 4}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -372,7 +372,7 @@ $rows = $result->all;  | 
              
| 372 | 372 | 
                   is_deeply($rows, [{$key1 => 'a:b c:d', $key2 => 2}]);
                 | 
              
| 373 | 373 | 
                   | 
              
| 374 | 374 | 
                  test 'Error case';  | 
              
| 375 | 
                  -eval {DBIx::Custom::Next->connect(dsn => 'dbi:SQLit')};
                 | 
              |
| 375 | 
                  +eval {DBIx::Custom->connect(dsn => 'dbi:SQLit')};
                 | 
              |
| 376 | 376 | 
                  ok($@, "connect error");  | 
              
| 377 | 377 | 
                   | 
              
| 378 | 378 | 
                  test 'insert';  | 
              
| ... | ... | 
                  @@ -871,7 +871,7 @@ eval{$dbi->delete(table => $table1, where => {';' => 1})};
                 | 
              
| 871 | 871 | 
                  like($@, qr/safety/);  | 
              
| 872 | 872 | 
                   | 
              
| 873 | 873 | 
                  $dbi = undef;  | 
              
| 874 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 874 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 875 | 875 | 
                   eval { $dbi->execute("drop table ${q}table$p") };
                 | 
              
| 876 | 876 | 
                  $dbi->execute($create_table_reserved);  | 
              
| 877 | 877 | 
                   $dbi->insert({select => 1}, table => 'table');
                 | 
              
| ... | ... | 
                  @@ -932,7 +932,7 @@ $rows = $dbi->select(  | 
              
| 932 | 932 | 
                  )->all;  | 
              
| 933 | 933 | 
                   is_deeply($rows, [{"${table1}_$key1" => 1, "${table2}_$key1" => 1, $key2 => 2, $key3 => 5}], "no exists where");
                 | 
              
| 934 | 934 | 
                   | 
              
| 935 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 935 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 936 | 936 | 
                   eval { $dbi->execute("drop table ${q}table$p") };
                 | 
              
| 937 | 937 | 
                  $dbi->execute($create_table_reserved);  | 
              
| 938 | 938 | 
                   $dbi->insert({select => 1, update => 2}, table => 'table');
                 | 
              
| ... | ... | 
                  @@ -962,7 +962,7 @@ $row = $result->fetch_first;  | 
              
| 962 | 962 | 
                  is_deeply($row, [3, 3, 2], "default_fetch_filter and filter");  | 
              
| 963 | 963 | 
                   | 
              
| 964 | 964 | 
                  test 'filters';  | 
              
| 965 | 
                  -$dbi = DBIx::Custom::Next->new;  | 
              |
| 965 | 
                  +$dbi = DBIx::Custom->new;  | 
              |
| 966 | 966 | 
                   | 
              
| 967 | 967 | 
                   is($dbi->filters->{decode_utf8}->(encode_utf8('あ')),
                 | 
              
| 968 | 968 | 
                  'あ', "decode_utf8");  | 
              
| ... | ... | 
                  @@ -971,7 +971,7 @@ is($dbi->filters->{encode_utf8}->('あ'),
                 | 
              
| 971 | 971 | 
                      encode_utf8('あ'), "encode_utf8");
                 | 
              
| 972 | 972 | 
                   | 
              
| 973 | 973 | 
                  test 'transaction1';  | 
              
| 974 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 974 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 975 | 975 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 976 | 976 | 
                  $dbi->execute($create_table1);  | 
              
| 977 | 977 | 
                  $dbi->begin_work;  | 
              
| ... | ... | 
                  @@ -984,7 +984,7 @@ $result = $dbi->select(table => $table1);  | 
              
| 984 | 984 | 
                  ok(! $result->fetch_first, "rollback");  | 
              
| 985 | 985 | 
                   | 
              
| 986 | 986 | 
                   | 
              
| 987 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 987 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 988 | 988 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 989 | 989 | 
                  $dbi->execute($create_table1);  | 
              
| 990 | 990 | 
                  $dbi->begin_work;  | 
              
| ... | ... | 
                  @@ -1018,7 +1018,7 @@ eval{$dbi->execute($query, {$key1 => {a => 1}})};
                 | 
              
| 1018 | 1018 | 
                  ok($@, "execute fail");  | 
              
| 1019 | 1019 | 
                   | 
              
| 1020 | 1020 | 
                  test 'transaction2';  | 
              
| 1021 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1021 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1022 | 1022 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1023 | 1023 | 
                  $dbi->execute($create_table1);  | 
              
| 1024 | 1024 | 
                   | 
              
| ... | ... | 
                  @@ -1096,7 +1096,7 @@ eval {$dbi->XXXXXX};
                 | 
              
| 1096 | 1096 | 
                  ok($@, "not exists");  | 
              
| 1097 | 1097 | 
                   | 
              
| 1098 | 1098 | 
                  test 'out filter';  | 
              
| 1099 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1099 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1100 | 1100 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1101 | 1101 | 
                  $dbi->execute($create_table1);  | 
              
| 1102 | 1102 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1109,7 +1109,7 @@ $result = $dbi->select(table => $table1);  | 
              
| 1109 | 1109 | 
                  $row = $result->one;  | 
              
| 1110 | 1110 | 
                   is_deeply($row, {$key1 => 1, $key2 => 2}, "insert");
                 | 
              
| 1111 | 1111 | 
                   | 
              
| 1112 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1112 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1113 | 1113 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1114 | 1114 | 
                  $dbi->execute($create_table1);  | 
              
| 1115 | 1115 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1119,7 +1119,7 @@ $result = $dbi->execute("select * from $table1");
                 | 
              
| 1119 | 1119 | 
                  $row = $result->one;  | 
              
| 1120 | 1120 | 
                   is_deeply($row, {$key1 => 1, $key2 => 2}, "insert");
                 | 
              
| 1121 | 1121 | 
                   | 
              
| 1122 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1122 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1123 | 1123 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1124 | 1124 | 
                  $dbi->execute($create_table1);  | 
              
| 1125 | 1125 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1129,7 +1129,7 @@ $result = $dbi->execute("select * from $table1");
                 | 
              
| 1129 | 1129 | 
                  $row = $result->one;  | 
              
| 1130 | 1130 | 
                   is_deeply($row, {$key1 => 2, $key2 => 2}, "update");
                 | 
              
| 1131 | 1131 | 
                   | 
              
| 1132 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1132 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1133 | 1133 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1134 | 1134 | 
                  $dbi->execute($create_table1);  | 
              
| 1135 | 1135 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1139,7 +1139,7 @@ $result = $dbi->execute("select * from $table1");
                 | 
              
| 1139 | 1139 | 
                  $rows = $result->all;  | 
              
| 1140 | 1140 | 
                  is_deeply($rows, [], "delete");  | 
              
| 1141 | 1141 | 
                   | 
              
| 1142 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1142 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1143 | 1143 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1144 | 1144 | 
                  $dbi->execute($create_table1);  | 
              
| 1145 | 1145 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1149,7 +1149,7 @@ $result->filter({$key2 => 'twice'});
                 | 
              
| 1149 | 1149 | 
                  $rows = $result->all;  | 
              
| 1150 | 1150 | 
                   is_deeply($rows, [{$key1 => 2, $key2 => 4}], "select");
                 | 
              
| 1151 | 1151 | 
                   | 
              
| 1152 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1152 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1153 | 1153 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1154 | 1154 | 
                  $dbi->execute($create_table1);  | 
              
| 1155 | 1155 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1160,7 +1160,7 @@ $result = $dbi->execute("select * from $table1 where $key1 = :$key1 and $key2 =
                 | 
              
| 1160 | 1160 | 
                  $rows = $result->all;  | 
              
| 1161 | 1161 | 
                   is_deeply($rows, [{$key1 => 2, $key2 => 2}], "execute");
                 | 
              
| 1162 | 1162 | 
                   | 
              
| 1163 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1163 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1164 | 1164 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1165 | 1165 | 
                  $dbi->execute($create_table1);  | 
              
| 1166 | 1166 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1170,7 +1170,7 @@ $result = $dbi->execute("select * from $table1 where $key1 = :$key1 and $key2 =
                 | 
              
| 1170 | 1170 | 
                  $rows = $result->all;  | 
              
| 1171 | 1171 | 
                   is_deeply($rows, [{$key1 => 2, $key2 => 2}], "execute table tag");
                 | 
              
| 1172 | 1172 | 
                   | 
              
| 1173 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1173 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1174 | 1174 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1175 | 1175 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 1176 | 1176 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -1201,27 +1201,27 @@ $rows = $result->all;  | 
              
| 1201 | 1201 | 
                   is_deeply($rows, [{$key2 => 4, $key3 => 6, "${table2}_$key3" => 6}], "select : join : omit");
                 | 
              
| 1202 | 1202 | 
                   | 
              
| 1203 | 1203 | 
                  test 'connect super';  | 
              
| 1204 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1204 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1205 | 1205 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1206 | 1206 | 
                  $dbi->execute($create_table1);  | 
              
| 1207 | 1207 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| 1208 | 1208 | 
                   is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 1209 | 1209 | 
                   | 
              
| 1210 | 
                  -$dbi = DBIx::Custom::Next->new;  | 
              |
| 1210 | 
                  +$dbi = DBIx::Custom->new;  | 
              |
| 1211 | 1211 | 
                  $dbi->connect;  | 
              
| 1212 | 1212 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1213 | 1213 | 
                  $dbi->execute($create_table1);  | 
              
| 1214 | 1214 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| 1215 | 1215 | 
                   is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 1216 | 1216 | 
                   | 
              
| 1217 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1217 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1218 | 1218 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1219 | 1219 | 
                  $dbi->execute($create_table1);  | 
              
| 1220 | 1220 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| 1221 | 1221 | 
                   is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 1222 | 1222 | 
                   | 
              
| 1223 | 1223 | 
                  test 'filter';  | 
              
| 1224 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1224 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1225 | 1225 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1226 | 1226 | 
                  $dbi->execute($create_table1);  | 
              
| 1227 | 1227 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1230,7 +1230,7 @@ $result->filter($key1 => sub { $_[0] * 2 }, $key2 => sub { $_[0] * 4 });
                 | 
              
| 1230 | 1230 | 
                  $row = $result->fetch_first;  | 
              
| 1231 | 1231 | 
                  is_deeply($row, [2, 8]);  | 
              
| 1232 | 1232 | 
                   | 
              
| 1233 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1233 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1234 | 1234 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1235 | 1235 | 
                  $dbi->execute($create_table1);  | 
              
| 1236 | 1236 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1239,7 +1239,7 @@ $result->filter($key1 => sub { $_[0] * 2 }, $key2 => sub { $_[0] * 4 });
                 | 
              
| 1239 | 1239 | 
                  $row = $result->fetch_first;  | 
              
| 1240 | 1240 | 
                  is_deeply($row, [2, 2, 8]);  | 
              
| 1241 | 1241 | 
                   | 
              
| 1242 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1242 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1243 | 1243 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1244 | 1244 | 
                  $dbi->execute($create_table1);  | 
              
| 1245 | 1245 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1248,7 +1248,7 @@ $result->filter([$key1, $key2] => sub { $_[0] * 2 });
                 | 
              
| 1248 | 1248 | 
                  $row = $result->fetch_first;  | 
              
| 1249 | 1249 | 
                  is_deeply($row, [2, 4]);  | 
              
| 1250 | 1250 | 
                   | 
              
| 1251 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1251 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1252 | 1252 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1253 | 1253 | 
                  $dbi->execute($create_table1);  | 
              
| 1254 | 1254 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1270,7 +1270,7 @@ $row = $result->one;  | 
              
| 1270 | 1270 | 
                   is_deeply($row, {$key1 => 2, $key2 => 8}, 'apply_filter');
                 | 
              
| 1271 | 1271 | 
                   | 
              
| 1272 | 1272 | 
                  test 'empty where select';  | 
              
| 1273 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1273 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1274 | 1274 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1275 | 1275 | 
                  $dbi->execute($create_table1);  | 
              
| 1276 | 1276 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1279,20 +1279,20 @@ $row = $result->one;  | 
              
| 1279 | 1279 | 
                   is_deeply($row, {$key1 => 1, $key2 => 2});
                 | 
              
| 1280 | 1280 | 
                   | 
              
| 1281 | 1281 | 
                  test 'select query option';  | 
              
| 1282 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1282 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1283 | 1283 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1284 | 1284 | 
                  $dbi->execute($create_table1);  | 
              
| 1285 | 1285 | 
                   $query = $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1, query => 1);
                 | 
              
| 1286 | 
                  -is(ref $query, 'HASH');  | 
              |
| 1286 | 
                  +ok(ref $query);  | 
              |
| 1287 | 1287 | 
                   $query = $dbi->update({$key2 => 2}, table => $table1, where => {$key1 => 1}, query => 1);
                 | 
              
| 1288 | 
                  -is(ref $query, 'HASH');  | 
              |
| 1288 | 
                  +ok(ref $query);  | 
              |
| 1289 | 1289 | 
                   $query = $dbi->delete(table => $table1, where => {$key1 => 1}, query => 1);
                 | 
              
| 1290 | 
                  -is(ref $query, 'HASH');  | 
              |
| 1290 | 
                  +ok(ref $query);  | 
              |
| 1291 | 1291 | 
                   $query = $dbi->select(table => $table1, where => {$key1 => 1, $key2 => 2}, query => 1);
                 | 
              
| 1292 | 
                  -is(ref $query, 'HASH');  | 
              |
| 1292 | 
                  +ok(ref $query);  | 
              |
| 1293 | 1293 | 
                   | 
              
| 1294 | 1294 | 
                  test 'where';  | 
              
| 1295 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1295 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1296 | 1296 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1297 | 1297 | 
                  $dbi->execute($create_table1);  | 
              
| 1298 | 1298 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1585,7 +1585,7 @@ $row = $result->all;  | 
              
| 1585 | 1585 | 
                   is_deeply($row, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 1586 | 1586 | 
                   | 
              
| 1587 | 1587 | 
                   | 
              
| 1588 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1588 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1589 | 1589 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1590 | 1590 | 
                  $dbi->execute($create_table1);  | 
              
| 1591 | 1591 | 
                   $dbi->insert({$key1 => 1, $key2 => '00:00:00'}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1602,11 +1602,11 @@ $row = $result->all;  | 
              
| 1602 | 1602 | 
                   is_deeply($row, [{$key1 => 1, $key2 => '00:00:00'}]);
                 | 
              
| 1603 | 1603 | 
                   | 
              
| 1604 | 1604 | 
                  test 'table not specify exception';  | 
              
| 1605 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1605 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1606 | 1606 | 
                   eval {$dbi->select};
                 | 
              
| 1607 | 1607 | 
                  like($@, qr/table/);  | 
              
| 1608 | 1608 | 
                   | 
              
| 1609 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1609 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1610 | 1610 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1611 | 1611 | 
                  $dbi->execute($create_table1);  | 
              
| 1612 | 1612 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1614,7 +1614,7 @@ $dbi->insert({$key1 => 3, $key2 => 4}, table => $table1);
                 | 
              
| 1614 | 1614 | 
                   $rows = $dbi->select(table => $table1, where => {$key2 => 2})->all;
                 | 
              
| 1615 | 1615 | 
                   is_deeply($rows, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 1616 | 1616 | 
                   | 
              
| 1617 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1617 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1618 | 1618 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1619 | 1619 | 
                  $dbi->execute($create_table1);  | 
              
| 1620 | 1620 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1625,10 +1625,10 @@ is_deeply($rows, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 1625 | 1625 | 
                   $dbi->helper({one => sub { 1 }});
                 | 
              
| 1626 | 1626 | 
                  is($dbi->one, 1);  | 
              
| 1627 | 1627 | 
                   | 
              
| 1628 | 
                  -eval{DBIx::Custom::Next->connect(dsn => undef)};
                 | 
              |
| 1628 | 
                  +eval{DBIx::Custom->connect(dsn => undef)};
                 | 
              |
| 1629 | 1629 | 
                  like($@, qr/_connect/);  | 
              
| 1630 | 1630 | 
                   | 
              
| 1631 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1631 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1632 | 1632 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1633 | 1633 | 
                  $dbi->execute($create_table1);  | 
              
| 1634 | 1634 | 
                   $dbi->register_filter(twice => sub { $_[0] * 2 });
                 | 
              
| ... | ... | 
                  @@ -1640,7 +1640,7 @@ eval {$dbi->insert({$key1 => 1, $key2 => 2}, table => $table1,
                 | 
              
| 1640 | 1640 | 
                                filter => {$key1 => 'no'}) };
                 | 
              
| 1641 | 1641 | 
                  like($@, qr//);  | 
              
| 1642 | 1642 | 
                   | 
              
| 1643 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1643 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1644 | 1644 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1645 | 1645 | 
                  $dbi->execute($create_table1);  | 
              
| 1646 | 1646 | 
                   $dbi->register_filter(one => sub { 1 });
                 | 
              
| ... | ... | 
                  @@ -1649,21 +1649,21 @@ eval {$result->filter($key1 => 'no')};
                 | 
              
| 1649 | 1649 | 
                  like($@, qr/not registered/);  | 
              
| 1650 | 1650 | 
                   | 
              
| 1651 | 1651 | 
                  test 'option';  | 
              
| 1652 | 
                  -$dbi = DBIx::Custom::Next->connect(option => {PrintError => 1});
                 | 
              |
| 1652 | 
                  +$dbi = DBIx::Custom->connect(option => {PrintError => 1});
                 | 
              |
| 1653 | 1653 | 
                   ok($dbi->dbh->{PrintError});
                 | 
              
| 1654 | 
                  -$dbi = DBIx::Custom::Next->connect(option => {PrintError => 1});
                 | 
              |
| 1654 | 
                  +$dbi = DBIx::Custom->connect(option => {PrintError => 1});
                 | 
              |
| 1655 | 1655 | 
                   ok($dbi->dbh->{PrintError});
                 | 
              
| 1656 | 
                  -$dbi = DBIx::Custom::Next->connect(option => {PrintError => 1});
                 | 
              |
| 1656 | 
                  +$dbi = DBIx::Custom->connect(option => {PrintError => 1});
                 | 
              |
| 1657 | 1657 | 
                   ok($dbi->dbh->{PrintError});
                 | 
              
| 1658 | 1658 | 
                   | 
              
| 1659 | 
                  -test 'DBIx::Custom::Next::Result stash()';  | 
              |
| 1660 | 
                  -$result = DBIx::Custom::Next::Result->new;  | 
              |
| 1659 | 
                  +test 'DBIx::Custom::Result stash()';  | 
              |
| 1660 | 
                  +$result = DBIx::Custom::Result->new;  | 
              |
| 1661 | 1661 | 
                   is_deeply($result->stash, {}, 'default');
                 | 
              
| 1662 | 1662 | 
                   $result->stash->{foo} = 1;
                 | 
              
| 1663 | 1663 | 
                   is($result->stash->{foo}, 1, 'get and set');
                 | 
              
| 1664 | 1664 | 
                   | 
              
| 1665 | 1665 | 
                  test 'delete';  | 
              
| 1666 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1666 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1667 | 1667 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1668 | 1668 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1669 | 1669 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1683,7 +1683,7 @@ $dbi->delete(  | 
              
| 1683 | 1683 | 
                  is_deeply($dbi->select(table => $table1)->all, []);  | 
              
| 1684 | 1684 | 
                   | 
              
| 1685 | 1685 | 
                  test 'insert';  | 
              
| 1686 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1686 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1687 | 1687 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1688 | 1688 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1689 | 1689 | 
                  $dbi->insert(  | 
              
| ... | ... | 
                  @@ -1709,7 +1709,7 @@ is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 1709 | 1709 | 
                   is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 1710 | 1710 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 3);
                 | 
              
| 1711 | 1711 | 
                   | 
              
| 1712 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1712 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1713 | 1713 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1714 | 1714 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1715 | 1715 | 
                  $dbi->insert(  | 
              
| ... | ... | 
                  @@ -1723,7 +1723,7 @@ is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 1723 | 1723 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 3);
                 | 
              
| 1724 | 1724 | 
                   | 
              
| 1725 | 1725 | 
                  test 'update';  | 
              
| 1726 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1726 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1727 | 1727 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1728 | 1728 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1729 | 1729 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1749,7 +1749,7 @@ is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 1749 | 1749 | 
                   is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 1750 | 1750 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 4);
                 | 
              
| 1751 | 1751 | 
                   | 
              
| 1752 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1752 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1753 | 1753 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1754 | 1754 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1755 | 1755 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1764,7 +1764,7 @@ is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 1764 | 1764 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 4);
                 | 
              
| 1765 | 1765 | 
                   | 
              
| 1766 | 1766 | 
                  test 'select';  | 
              
| 1767 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1767 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1768 | 1768 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1769 | 1769 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1770 | 1770 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -1881,7 +1881,7 @@ is_deeply($result->one,  | 
              
| 1881 | 1881 | 
                             {$key1 => 1, $key2 => 2, "${table2}__$key1" => 1, "${table2}__$key3" => 3});
                 | 
              
| 1882 | 1882 | 
                   | 
              
| 1883 | 1883 | 
                  test 'values_clause';  | 
              
| 1884 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1884 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1885 | 1885 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1886 | 1886 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1887 | 1887 | 
                   $param = {$key1 => 1, $key2 => 2};
                 | 
              
| ... | ... | 
                  @@ -1893,7 +1893,7 @@ $dbi->execute($sql, $param, table => $table1);  | 
              
| 1893 | 1893 | 
                   is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 1894 | 1894 | 
                   is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 1895 | 1895 | 
                   | 
              
| 1896 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1896 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1897 | 1897 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1898 | 1898 | 
                  $dbi->execute($create_table1_2);  | 
              
| 1899 | 1899 | 
                   $param = {$key1 => 1, $key2 => 2};
                 | 
              
| ... | ... | 
                  @@ -1961,7 +1961,7 @@ is_deeply($result->one,  | 
              
| 1961 | 1961 | 
                             {$key1 => 1, "$table2.$key1" => 1});
                 | 
              
| 1962 | 1962 | 
                   | 
              
| 1963 | 1963 | 
                  test 'merge_param';  | 
              
| 1964 | 
                  -$dbi = DBIx::Custom::Next->new;  | 
              |
| 1964 | 
                  +$dbi = DBIx::Custom->new;  | 
              |
| 1965 | 1965 | 
                  $params = [  | 
              
| 1966 | 1966 | 
                       {$key1 => 1, $key2 => 2, $key3 => 3},
                 | 
              
| 1967 | 1967 | 
                       {$key1 => 1, $key2 => 2},
                 | 
              
| ... | ... | 
                  @@ -1978,7 +1978,7 @@ $param = $dbi->merge_param($params->[0], $params->[1]);  | 
              
| 1978 | 1978 | 
                   is_deeply($param, {$key1 => [1, 2, 3, 4], $key2 => [1, 2, 3], $key3 => [1, 2, 3]});
                 | 
              
| 1979 | 1979 | 
                   | 
              
| 1980 | 1980 | 
                  test 'select() param option';  | 
              
| 1981 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 1981 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 1982 | 1982 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 1983 | 1983 | 
                  $dbi->execute($create_table1);  | 
              
| 1984 | 1984 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2008,7 +2008,7 @@ $rows = $dbi->select(  | 
              
| 2008 | 2008 | 
                   is_deeply($rows, [{"${table1}_$key1" => 2, $key2 => 3, $key3 => 5}]);
                 | 
              
| 2009 | 2009 | 
                   | 
              
| 2010 | 2010 | 
                  test 'select() string where';  | 
              
| 2011 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2011 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2012 | 2012 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2013 | 2013 | 
                  $dbi->execute($create_table1);  | 
              
| 2014 | 2014 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2022,7 +2022,7 @@ $rows = $dbi->select(  | 
              
| 2022 | 2022 | 
                  )->all;  | 
              
| 2023 | 2023 | 
                   is_deeply($rows, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 2024 | 2024 | 
                   | 
              
| 2025 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2025 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2026 | 2026 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2027 | 2027 | 
                  $dbi->execute($create_table1);  | 
              
| 2028 | 2028 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2036,7 +2036,7 @@ $rows = $dbi->select(  | 
              
| 2036 | 2036 | 
                  )->all;  | 
              
| 2037 | 2037 | 
                   is_deeply($rows, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 2038 | 2038 | 
                   | 
              
| 2039 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2039 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2040 | 2040 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2041 | 2041 | 
                  $dbi->execute($create_table1);  | 
              
| 2042 | 2042 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2051,7 +2051,7 @@ $rows = $dbi->select(  | 
              
| 2051 | 2051 | 
                   is_deeply($rows, [{$key1 => 1, $key2 => 2}]);
                 | 
              
| 2052 | 2052 | 
                   | 
              
| 2053 | 2053 | 
                  test 'delete() string where';  | 
              
| 2054 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2054 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2055 | 2055 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2056 | 2056 | 
                  $dbi->execute($create_table1);  | 
              
| 2057 | 2057 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2066,7 +2066,7 @@ $dbi->delete(  | 
              
| 2066 | 2066 | 
                  $rows = $dbi->select(table => $table1)->all;  | 
              
| 2067 | 2067 | 
                   is_deeply($rows, [{$key1 => 2, $key2 => 3}]);
                 | 
              
| 2068 | 2068 | 
                   | 
              
| 2069 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2069 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2070 | 2070 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2071 | 2071 | 
                  $dbi->execute($create_table1);  | 
              
| 2072 | 2072 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2083,7 +2083,7 @@ is_deeply($rows, [{$key1 => 2, $key2 => 3}]);
                 | 
              
| 2083 | 2083 | 
                   | 
              
| 2084 | 2084 | 
                   | 
              
| 2085 | 2085 | 
                  test 'update() string where';  | 
              
| 2086 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2086 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2087 | 2087 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2088 | 2088 | 
                  $dbi->execute($create_table1);  | 
              
| 2089 | 2089 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2098,7 +2098,7 @@ $dbi->update(  | 
              
| 2098 | 2098 | 
                  $rows = $dbi->select(table => $table1)->all;  | 
              
| 2099 | 2099 | 
                   is_deeply($rows, [{$key1 => 5, $key2 => 2}]);
                 | 
              
| 2100 | 2100 | 
                   | 
              
| 2101 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2101 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2102 | 2102 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2103 | 2103 | 
                  $dbi->execute($create_table1);  | 
              
| 2104 | 2104 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2114,7 +2114,7 @@ $rows = $dbi->select(table => $table1)->all;  | 
              
| 2114 | 2114 | 
                   is_deeply($rows, [{$key1 => 5, $key2 => 2}]);
                 | 
              
| 2115 | 2115 | 
                   | 
              
| 2116 | 2116 | 
                  test 'insert id and primary_key option';  | 
              
| 2117 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2117 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2118 | 2118 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2119 | 2119 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2120 | 2120 | 
                  $dbi->insert(  | 
              
| ... | ... | 
                  @@ -2139,7 +2139,7 @@ is($dbi->select(table => $table1)->one->{$key1}, 0);
                 | 
              
| 2139 | 2139 | 
                   is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 2140 | 2140 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 3);
                 | 
              
| 2141 | 2141 | 
                   | 
              
| 2142 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2142 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2143 | 2143 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2144 | 2144 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2145 | 2145 | 
                  $dbi->insert(  | 
              
| ... | ... | 
                  @@ -2152,7 +2152,7 @@ is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 2152 | 2152 | 
                   ok(!$dbi->select(table => $table1)->one->{$key2});
                 | 
              
| 2153 | 2153 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 3);
                 | 
              
| 2154 | 2154 | 
                   | 
              
| 2155 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2155 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2156 | 2156 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2157 | 2157 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2158 | 2158 | 
                  $dbi->insert(  | 
              
| ... | ... | 
                  @@ -2165,7 +2165,7 @@ is($dbi->select(table => $table1)->one->{$key1}, 1);
                 | 
              
| 2165 | 2165 | 
                   is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 2166 | 2166 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 3);
                 | 
              
| 2167 | 2167 | 
                   | 
              
| 2168 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2168 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2169 | 2169 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2170 | 2170 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2171 | 2171 | 
                   $param = {$key3 => 3, $key2 => 4};
                 | 
              
| ... | ... | 
                  @@ -2180,7 +2180,7 @@ is($dbi->select(table => $table1)->one->{$key2}, 4);
                 | 
              
| 2180 | 2180 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 3);
                 | 
              
| 2181 | 2181 | 
                   is_deeply($param, {$key3 => 3, $key2 => 4});
                 | 
              
| 2182 | 2182 | 
                   | 
              
| 2183 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2183 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2184 | 2184 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2185 | 2185 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2186 | 2186 | 
                   $param = {$key3 => 3, $key2 => 4};
                 | 
              
| ... | ... | 
                  @@ -2191,7 +2191,7 @@ $dbi->insert(  | 
              
| 2191 | 2191 | 
                  id => [1, 2],  | 
              
| 2192 | 2192 | 
                  query => 1  | 
              
| 2193 | 2193 | 
                  );  | 
              
| 2194 | 
                  -is(ref $query, 'HASH');  | 
              |
| 2194 | 
                  +ok(ref $query);  | 
              |
| 2195 | 2195 | 
                   is_deeply($param, {$key3 => 3, $key2 => 4});
                 | 
              
| 2196 | 2196 | 
                   | 
              
| 2197 | 2197 | 
                  test 'model insert id and primary_key option';  | 
              
| ... | ... | 
                  @@ -2222,7 +2222,7 @@ is($row->{$key2}, 2);
                 | 
              
| 2222 | 2222 | 
                   is($row->{$key3}, 3);
                 | 
              
| 2223 | 2223 | 
                   | 
              
| 2224 | 2224 | 
                  test 'update and id option';  | 
              
| 2225 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2225 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2226 | 2226 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2227 | 2227 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2228 | 2228 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2248,7 +2248,7 @@ is($dbi->select(table => $table1)->one->{$key1}, 0);
                 | 
              
| 2248 | 2248 | 
                   is($dbi->select(table => $table1)->one->{$key2}, 2);
                 | 
              
| 2249 | 2249 | 
                   is($dbi->select(table => $table1)->one->{$key3}, 4);
                 | 
              
| 2250 | 2250 | 
                   | 
              
| 2251 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2251 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2252 | 2252 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2253 | 2253 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2254 | 2254 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2280,7 +2280,7 @@ is($row->{$key3}, 4);
                 | 
              
| 2280 | 2280 | 
                   | 
              
| 2281 | 2281 | 
                   | 
              
| 2282 | 2282 | 
                  test 'delete and id option';  | 
              
| 2283 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2283 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2284 | 2284 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2285 | 2285 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2286 | 2286 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2320,7 +2320,7 @@ is_deeply($dbi->select(table => $table3)->all, []);  | 
              
| 2320 | 2320 | 
                   | 
              
| 2321 | 2321 | 
                   | 
              
| 2322 | 2322 | 
                  test 'select and id option';  | 
              
| 2323 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2323 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2324 | 2324 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2325 | 2325 | 
                  $dbi->execute($create_table1_2);  | 
              
| 2326 | 2326 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2396,7 +2396,7 @@ is_deeply($result->one,  | 
              
| 2396 | 2396 | 
                             {"$table2.$key1" => 1, "$table2.$key3" => 3});
                 | 
              
| 2397 | 2397 | 
                   | 
              
| 2398 | 2398 | 
                  test 'separator';  | 
              
| 2399 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2399 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2400 | 2400 | 
                  $dbi->user_table_info($user_table_info);  | 
              
| 2401 | 2401 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2402 | 2402 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| ... | ... | 
                  @@ -2455,7 +2455,7 @@ is_deeply($result->one,  | 
              
| 2455 | 2455 | 
                   is_deeply($model2->select->one, {$key1 => 1, $key3 => 3});
                 | 
              
| 2456 | 2456 | 
                   | 
              
| 2457 | 2457 | 
                   | 
              
| 2458 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2458 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2459 | 2459 | 
                  $dbi->user_table_info($user_table_info);  | 
              
| 2460 | 2460 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2461 | 2461 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| ... | ... | 
                  @@ -2477,12 +2477,12 @@ $result->filter($key1 => sub { $_[0] * 2 });
                 | 
              
| 2477 | 2477 | 
                   is_deeply($result->one, {$key1 => 2});
                 | 
              
| 2478 | 2478 | 
                   | 
              
| 2479 | 2479 | 
                  test 'available_datetype';  | 
              
| 2480 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2480 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2481 | 2481 | 
                   ok($dbi->can('available_datatype'));
                 | 
              
| 2482 | 2482 | 
                   | 
              
| 2483 | 2483 | 
                   | 
              
| 2484 | 2484 | 
                  test 'select prefix option';  | 
              
| 2485 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2485 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2486 | 2486 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2487 | 2487 | 
                  $dbi->execute($create_table1);  | 
              
| 2488 | 2488 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2491,7 +2491,7 @@ is_deeply($rows, [{$key1 => 1, $key2 => 2}], "table");
                 | 
              
| 2491 | 2491 | 
                   | 
              
| 2492 | 2492 | 
                   | 
              
| 2493 | 2493 | 
                  test 'mapper';  | 
              
| 2494 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2494 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2495 | 2495 | 
                   $param = $dbi->mapper(param => {id => 1, author => 'Ken', price => 1900})->map(
                 | 
              
| 2496 | 2496 | 
                       id => {key => "$table1.id"},
                 | 
              
| 2497 | 2497 | 
                       author => ["$table1.author" => sub { '%' . $_[0] . '%' }],
                 | 
              
| ... | ... | 
                  @@ -2500,7 +2500,7 @@ $param = $dbi->mapper(param => {id => 1, author => 'Ken', price => 1900})->map(
                 | 
              
| 2500 | 2500 | 
                   is_deeply($param, {"$table1.id" => 1, "$table1.author" => '%Ken%',
                 | 
              
| 2501 | 2501 | 
                  "$table1.price" => 1900});  | 
              
| 2502 | 2502 | 
                   | 
              
| 2503 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2503 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2504 | 2504 | 
                   $param = $dbi->mapper(param => {id => 1, author => 'Ken', price => 1900})->map(
                 | 
              
| 2505 | 2505 | 
                       id => {key => "$table1.id"},
                 | 
              
| 2506 | 2506 | 
                  author => ["$table1.author" => $dbi->like_value],  | 
              
| ... | ... | 
                  @@ -2686,7 +2686,7 @@ $param = $dbi->mapper(param => {id => 'a', author => 'b', price => 'c'}, pass =>
                 | 
              
| 2686 | 2686 | 
                   is_deeply($param, {id => 'a', author => 'b', 'book.price' => 'c'});
                 | 
              
| 2687 | 2687 | 
                   | 
              
| 2688 | 2688 | 
                  test 'order';  | 
              
| 2689 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2689 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2690 | 2690 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2691 | 2691 | 
                  $dbi->execute($create_table1);  | 
              
| 2692 | 2692 | 
                   $dbi->insert({$key1 => 1, $key2 => 1}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2714,7 +2714,7 @@ is_deeply($result->all, [{"$table1-$key1" => 1, "$table1-$key2" => 3},
                 | 
              
| 2714 | 2714 | 
                     {"$table1-$key1" => 2, "$table1-$key2" => 2}]);
                 | 
              
| 2715 | 2715 | 
                   | 
              
| 2716 | 2716 | 
                  test 'last_sql';  | 
              
| 2717 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2717 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2718 | 2718 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2719 | 2719 | 
                  $dbi->execute($create_table1);  | 
              
| 2720 | 2720 | 
                   $dbi->execute("select * from $table1");
                 | 
              
| ... | ... | 
                  @@ -2723,8 +2723,8 @@ is($dbi->last_sql, "select * from $table1");  | 
              
| 2723 | 2723 | 
                   eval{$dbi->execute("aaa")};
                 | 
              
| 2724 | 2724 | 
                  is($dbi->last_sql, 'aaa');  | 
              
| 2725 | 2725 | 
                   | 
              
| 2726 | 
                  -test 'DBIx::Custom::Next header';  | 
              |
| 2727 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2726 | 
                  +test 'DBIx::Custom header';  | 
              |
| 2727 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2728 | 2728 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2729 | 2729 | 
                  $dbi->execute($create_table1);  | 
              
| 2730 | 2730 | 
                   $result = $dbi->execute("select $key1 as h1, $key2 as h2 from $table1");
                 | 
              
| ... | ... | 
                  @@ -2776,7 +2776,7 @@ $result = $model->select(  | 
              
| 2776 | 2776 | 
                   is_deeply($result->all, [{"$table1.$key2" => 2}]);
                 | 
              
| 2777 | 2777 | 
                   | 
              
| 2778 | 2778 | 
                  test 'result';  | 
              
| 2779 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2779 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2780 | 2780 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2781 | 2781 | 
                  $dbi->execute($create_table1);  | 
              
| 2782 | 2782 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2796,7 +2796,7 @@ while (my $row = $result->fetch_hash) {
                 | 
              
| 2796 | 2796 | 
                  }  | 
              
| 2797 | 2797 | 
                   is_deeply(\@rows, [{$key1 => 1, $key2 => 2}, {$key1 => 3, $key2 => 4}]);
                 | 
              
| 2798 | 2798 | 
                   | 
              
| 2799 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2799 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2800 | 2800 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2801 | 2801 | 
                  $dbi->execute($create_table1);  | 
              
| 2802 | 2802 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2829,7 +2829,7 @@ $result->filter({$key1 => 'three_times'});
                 | 
              
| 2829 | 2829 | 
                  $rows = $result->fetch_hash_all;  | 
              
| 2830 | 2830 | 
                   is_deeply($rows, [{$key1 => 3, $key2 => 2}, {$key1 => 9, $key2 => 4}], "hash");
                 | 
              
| 2831 | 2831 | 
                   | 
              
| 2832 | 
                  -test 'DBIx::Custom::Next::Result fetch_multi';  | 
              |
| 2832 | 
                  +test 'DBIx::Custom::Result fetch_multi';  | 
              |
| 2833 | 2833 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2834 | 2834 | 
                  $dbi->execute($create_table1);  | 
              
| 2835 | 2835 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2843,7 +2843,7 @@ is_deeply($rows, [[5, 6]]);  | 
              
| 2843 | 2843 | 
                  $rows = $result->fetch_multi(2);  | 
              
| 2844 | 2844 | 
                  ok(!$rows);  | 
              
| 2845 | 2845 | 
                   | 
              
| 2846 | 
                  -test 'DBIx::Custom::Next::Result fetch_hash_multi';  | 
              |
| 2846 | 
                  +test 'DBIx::Custom::Result fetch_hash_multi';  | 
              |
| 2847 | 2847 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2848 | 2848 | 
                  $dbi->execute($create_table1);  | 
              
| 2849 | 2849 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -2858,7 +2858,7 @@ $rows = $result->fetch_hash_multi(2);  | 
              
| 2858 | 2858 | 
                  ok(!$rows);  | 
              
| 2859 | 2859 | 
                   | 
              
| 2860 | 2860 | 
                  test 'select() after_build_sql option';  | 
              
| 2861 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2861 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2862 | 2862 | 
                  $dbi->user_table_info($user_table_info);  | 
              
| 2863 | 2863 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2864 | 2864 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -2876,7 +2876,7 @@ $rows = $dbi->select(  | 
              
| 2876 | 2876 | 
                   is_deeply($rows, [{$key1 => 1}]);
                 | 
              
| 2877 | 2877 | 
                   | 
              
| 2878 | 2878 | 
                  test 'select() after_build_sql option';  | 
              
| 2879 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2879 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2880 | 2880 | 
                  $dbi->user_table_info($user_table_info);  | 
              
| 2881 | 2881 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2882 | 2882 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -2943,7 +2943,7 @@ is_deeply($result->one,  | 
              
| 2943 | 2943 | 
                             {"$table2_alias-$key1" => 1, "$table2_alias-$key3" => 4});
                 | 
              
| 2944 | 2944 | 
                   | 
              
| 2945 | 2945 | 
                  test 'create_model';  | 
              
| 2946 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2946 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2947 | 2947 | 
                  $dbi->user_table_info($user_table_info);  | 
              
| 2948 | 2948 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 2949 | 2949 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| ... | ... | 
                  @@ -2976,7 +2976,7 @@ is_deeply($result->one,  | 
              
| 2976 | 2976 | 
                   is_deeply($model2->select->one, {$key1 => 1, $key3 => 3});
                 | 
              
| 2977 | 2977 | 
                   | 
              
| 2978 | 2978 | 
                  test 'model helper';  | 
              
| 2979 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2979 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2980 | 2980 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 2981 | 2981 | 
                  $dbi->execute($create_table2);  | 
              
| 2982 | 2982 | 
                   $dbi->insert({$key1 => 1, $key3 => 3}, table => $table2);
                 | 
              
| ... | ... | 
                  @@ -2987,7 +2987,7 @@ $model->helper(foo => sub { shift->select(@_) });
                 | 
              
| 2987 | 2987 | 
                   is_deeply($model->foo->one, {$key1 => 1, $key3 => 3});
                 | 
              
| 2988 | 2988 | 
                   | 
              
| 2989 | 2989 | 
                  test 'model helper';  | 
              
| 2990 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 2990 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 2991 | 2991 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 2992 | 2992 | 
                  $dbi->execute($create_table2);  | 
              
| 2993 | 2993 | 
                   $dbi->insert({$key1 => 1, $key3 => 3}, table => $table2);
                 | 
              
| ... | ... | 
                  @@ -2998,7 +2998,7 @@ $model->helper(foo => sub { shift->select(@_) });
                 | 
              
| 2998 | 2998 | 
                   is_deeply($model->foo->one, {$key1 => 1, $key3 => 3});
                 | 
              
| 2999 | 2999 | 
                   | 
              
| 3000 | 3000 | 
                  test 'assign_clause';  | 
              
| 3001 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3001 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3002 | 3002 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3003 | 3003 | 
                  $dbi->execute($create_table1_2);  | 
              
| 3004 | 3004 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3, $key4 => 4, $key5 => 5}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3018,7 +3018,7 @@ is_deeply($rows, [{$key1 => 1, $key2 => 11, $key3 => 3, $key4 => 4, $key5 => 5},
                 | 
              
| 3018 | 3018 | 
                  "basic");  | 
              
| 3019 | 3019 | 
                   | 
              
| 3020 | 3020 | 
                   | 
              
| 3021 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3021 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3022 | 3022 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3023 | 3023 | 
                  $dbi->execute($create_table1_2);  | 
              
| 3024 | 3024 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3, $key4 => 4, $key5 => 5}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3037,7 +3037,7 @@ is_deeply($rows, [{$key1 => 1, $key2 => 11, $key3 => 33, $key4 => 4, $key5 => 5}
                 | 
              
| 3037 | 3037 | 
                                     {$key1 => 6, $key2 => 7,  $key3 => 8, $key4 => 9, $key5 => 10}],
                 | 
              
| 3038 | 3038 | 
                  "basic");  | 
              
| 3039 | 3039 | 
                   | 
              
| 3040 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3040 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3041 | 3041 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3042 | 3042 | 
                  $dbi->execute($create_table1_2);  | 
              
| 3043 | 3043 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3, $key4 => 4, $key5 => 5}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3057,7 +3057,7 @@ is_deeply($rows, [{$key1 => 1, $key2 => 11, $key3 => 33, $key4 => 4, $key5 => 5}
                 | 
              
| 3057 | 3057 | 
                  "update param no_set");  | 
              
| 3058 | 3058 | 
                   | 
              
| 3059 | 3059 | 
                   | 
              
| 3060 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3060 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3061 | 3061 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3062 | 3062 | 
                  $dbi->execute($create_table1_2);  | 
              
| 3063 | 3063 | 
                   $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3, $key4 => 4, $key5 => 5}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3153,7 +3153,7 @@ is_deeply([sort @{$dbi->model($table1)->columns}], [$key1, $key2]);
                 | 
              
| 3153 | 3153 | 
                   is_deeply([sort @{$dbi->model($table2)->columns}], [$key1, $key3]);
                 | 
              
| 3154 | 3154 | 
                   | 
              
| 3155 | 3155 | 
                  test 'each_column';  | 
              
| 3156 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3156 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3157 | 3157 | 
                   eval { $dbi->execute("drop table ${q}table$p") };
                 | 
              
| 3158 | 3158 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3159 | 3159 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| ... | ... | 
                  @@ -3182,7 +3182,7 @@ is_deeply($infos,  | 
              
| 3182 | 3182 | 
                  );  | 
              
| 3183 | 3183 | 
                   | 
              
| 3184 | 3184 | 
                  test 'each_table';  | 
              
| 3185 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3185 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3186 | 3186 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3187 | 3187 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 3188 | 3188 | 
                  $dbi->execute($create_table2);  | 
              
| ... | ... | 
                  @@ -3205,7 +3205,7 @@ is_deeply($infos,  | 
              
| 3205 | 3205 | 
                  ]  | 
              
| 3206 | 3206 | 
                  );  | 
              
| 3207 | 3207 | 
                   | 
              
| 3208 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3208 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3209 | 3209 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3210 | 3210 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 3211 | 3211 | 
                  $dbi->execute($create_table2);  | 
              
| ... | ... | 
                  @@ -3236,7 +3236,7 @@ $dbi->execute($create_table1_type);  | 
              
| 3236 | 3236 | 
                  $user_column_info = $dbi->get_column_info(exclude_table => $dbi->exclude_table);  | 
              
| 3237 | 3237 | 
                   | 
              
| 3238 | 3238 | 
                   | 
              
| 3239 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3239 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3240 | 3240 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3241 | 3241 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3242 | 3242 | 
                   | 
              
| ... | ... | 
                  @@ -3250,7 +3250,7 @@ $dbi->insert({$key1 => '01-01'}, table => $table1);
                 | 
              
| 3250 | 3250 | 
                  $result = $dbi->select(table => $table1);  | 
              
| 3251 | 3251 | 
                   like($result->one->{$key1}, qr/^2010-01-01/);
                 | 
              
| 3252 | 3252 | 
                   | 
              
| 3253 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3253 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3254 | 3254 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3255 | 3255 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3256 | 3256 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3269,7 +3269,7 @@ $row = $result->one;  | 
              
| 3269 | 3269 | 
                   like($row->{$key1}, qr/^2010-01-03/);
                 | 
              
| 3270 | 3270 | 
                   like($row->{$key2}, qr/^2010-01-01 01:01:03/);
                 | 
              
| 3271 | 3271 | 
                   | 
              
| 3272 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3272 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3273 | 3273 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3274 | 3274 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3275 | 3275 | 
                   $dbi->insert({$key1 => '2010-01-03', $key2 => '2010-01-01 01:01:03'}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3291,7 +3291,7 @@ $row = $result->one;  | 
              
| 3291 | 3291 | 
                   like($row->{$key1}, qr/^2010-01-03/);
                 | 
              
| 3292 | 3292 | 
                   like($row->{$key2}, qr/^2010-01-01 01:01:03/);
                 | 
              
| 3293 | 3293 | 
                   | 
              
| 3294 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3294 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3295 | 3295 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3296 | 3296 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3297 | 3297 | 
                   $dbi->insert({$key1 => '2010-01-03', $key2 => '2010-01-01 01:01:03'}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3314,7 +3314,7 @@ $row = $result->one;  | 
              
| 3314 | 3314 | 
                   like($row->{$key1}, qr/^2010-01-03/);
                 | 
              
| 3315 | 3315 | 
                   like($row->{$key2}, qr/2010-01-01 01:01:03/);
                 | 
              
| 3316 | 3316 | 
                   | 
              
| 3317 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3317 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3318 | 3318 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3319 | 3319 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3320 | 3320 | 
                   $dbi->register_filter(convert => sub {
                 | 
              
| ... | ... | 
                  @@ -3340,7 +3340,7 @@ like($row->[0], qr/^2010-03-03/);  | 
              
| 3340 | 3340 | 
                  like($row->[1], qr/^2010-03-03/);  | 
              
| 3341 | 3341 | 
                   | 
              
| 3342 | 3342 | 
                  test 'type_rule and filter order';  | 
              
| 3343 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3343 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3344 | 3344 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3345 | 3345 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3346 | 3346 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3365,7 +3365,7 @@ $result->filter($key1 => sub { my $v = shift || ''; $v =~ s/8/9/; return $v });
                 | 
              
| 3365 | 3365 | 
                  like($result->fetch_first->[0], qr/^2010-01-09/);  | 
              
| 3366 | 3366 | 
                   | 
              
| 3367 | 3367 | 
                   | 
              
| 3368 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3368 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3369 | 3369 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3370 | 3370 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3371 | 3371 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3392,7 +3392,7 @@ $result->filter($key1 => sub { my $v = shift || ''; $v =~ s/8/9/; return $v });
                 | 
              
| 3392 | 3392 | 
                  like($result->fetch_first->[0], qr/^2010-01-09/);  | 
              
| 3393 | 3393 | 
                   | 
              
| 3394 | 3394 | 
                  test 'type_rule_off';  | 
              
| 3395 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3395 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3396 | 3396 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3397 | 3397 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3398 | 3398 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3408,7 +3408,7 @@ $dbi->insert({$key1 => '2010-01-03'}, table => $table1, type_rule_off => 1);
                 | 
              
| 3408 | 3408 | 
                  $result = $dbi->select(table => $table1, type_rule_off => 1);  | 
              
| 3409 | 3409 | 
                  like($result->type_rule_off->fetch->[0], qr/^2010-01-03/);  | 
              
| 3410 | 3410 | 
                   | 
              
| 3411 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3411 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3412 | 3412 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3413 | 3413 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3414 | 3414 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3424,7 +3424,7 @@ $dbi->insert({$key1 => '2010-01-03'}, table => $table1, type_rule_off => 1);
                 | 
              
| 3424 | 3424 | 
                  $result = $dbi->select(table => $table1, type_rule_off => 1);  | 
              
| 3425 | 3425 | 
                   like($result->one->{$key1}, qr/^2010-01-04/);
                 | 
              
| 3426 | 3426 | 
                   | 
              
| 3427 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3427 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3428 | 3428 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3429 | 3429 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3430 | 3430 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3440,7 +3440,7 @@ $dbi->insert({$key1 => '2010-01-03'}, table => $table1);
                 | 
              
| 3440 | 3440 | 
                  $result = $dbi->select(table => $table1);  | 
              
| 3441 | 3441 | 
                   like($result->one->{$key1}, qr/^2010-01-05/);
                 | 
              
| 3442 | 3442 | 
                   | 
              
| 3443 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3443 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3444 | 3444 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3445 | 3445 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3446 | 3446 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3456,7 +3456,7 @@ $dbi->insert({$key1 => '2010-01-03'}, table => $table1);
                 | 
              
| 3456 | 3456 | 
                  $result = $dbi->select(table => $table1);  | 
              
| 3457 | 3457 | 
                  like($result->fetch->[0], qr/2010-01-05/);  | 
              
| 3458 | 3458 | 
                   | 
              
| 3459 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3459 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3460 | 3460 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3461 | 3461 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3462 | 3462 | 
                   $dbi->register_filter(ppp => sub { my $v = shift || ''; $v =~ s/3/4/; return $v });
                 | 
              
| ... | ... | 
                  @@ -3477,7 +3477,7 @@ eval{$dbi->type_rule(
                 | 
              
| 3477 | 3477 | 
                  )};  | 
              
| 3478 | 3478 | 
                  like($@, qr/not registered/);  | 
              
| 3479 | 3479 | 
                   | 
              
| 3480 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3480 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3481 | 3481 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3482 | 3482 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3483 | 3483 | 
                   eval {
                 | 
              
| ... | ... | 
                  @@ -3498,7 +3498,7 @@ eval {
                 | 
              
| 3498 | 3498 | 
                  };  | 
              
| 3499 | 3499 | 
                  like($@, qr/lower/);  | 
              
| 3500 | 3500 | 
                   | 
              
| 3501 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3501 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3502 | 3502 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3503 | 3503 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3504 | 3504 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3515,7 +3515,7 @@ $result = $dbi->select(table => $table1);  | 
              
| 3515 | 3515 | 
                  $result->type_rule_off;  | 
              
| 3516 | 3516 | 
                   like($result->one->{$key1}, qr/^2010-01-04/);
                 | 
              
| 3517 | 3517 | 
                   | 
              
| 3518 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3518 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3519 | 3519 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3520 | 3520 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3521 | 3521 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3581,7 +3581,7 @@ $row = $result->one;  | 
              
| 3581 | 3581 | 
                   like($row->{$key1}, qr/^2010-01-03/);
                 | 
              
| 3582 | 3582 | 
                   like($row->{$key2}, qr/^2010-01-01 01:01:03/);
                 | 
              
| 3583 | 3583 | 
                   | 
              
| 3584 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3584 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3585 | 3585 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3586 | 3586 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3587 | 3587 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3595,7 +3595,7 @@ $result = $dbi->select(table => $table1);  | 
              
| 3595 | 3595 | 
                   $result->filter($key1 => sub { my $v = shift || ''; $v =~ s/4/5/; return $v });
                 | 
              
| 3596 | 3596 | 
                   like($result->one->{$key1}, qr/^2010-01-05/);
                 | 
              
| 3597 | 3597 | 
                   | 
              
| 3598 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3598 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3599 | 3599 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3600 | 3600 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3601 | 3601 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3609,7 +3609,7 @@ $result = $dbi->select(table => $table1);  | 
              
| 3609 | 3609 | 
                   $result->filter($key1 => sub { my $v = shift || ''; $v =~ s/4/5/; return $v });
                 | 
              
| 3610 | 3610 | 
                  like($result->fetch->[0], qr/^2010-01-05/);  | 
              
| 3611 | 3611 | 
                   | 
              
| 3612 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3612 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3613 | 3613 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3614 | 3614 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3615 | 3615 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3633,7 +3633,7 @@ like($result->type_rule_off->fetch_first->[0], qr/^2010-01-03/);  | 
              
| 3633 | 3633 | 
                  $result = $dbi->select(table => $table1);  | 
              
| 3634 | 3634 | 
                  like($result->type_rule_on->fetch_first->[0], qr/^2010-01-07/);  | 
              
| 3635 | 3635 | 
                   | 
              
| 3636 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3636 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3637 | 3637 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3638 | 3638 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3639 | 3639 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3657,7 +3657,7 @@ like($result->type_rule1_off->fetch_first->[0], qr/^2010-01-05/);  | 
              
| 3657 | 3657 | 
                  $result = $dbi->select(table => $table1);  | 
              
| 3658 | 3658 | 
                  like($result->type_rule1_on->fetch_first->[0], qr/^2010-01-07/);  | 
              
| 3659 | 3659 | 
                   | 
              
| 3660 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3660 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3661 | 3661 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3662 | 3662 | 
                  $dbi->execute($create_table1_type);  | 
              
| 3663 | 3663 | 
                  $dbi->user_column_info($user_column_info);  | 
              
| ... | ... | 
                  @@ -3682,7 +3682,7 @@ $result = $dbi->select(table => $table1);  | 
              
| 3682 | 3682 | 
                  like($result->type_rule2_on->fetch_first->[0], qr/^2010-01-07/);  | 
              
| 3683 | 3683 | 
                   | 
              
| 3684 | 3684 | 
                  test 'join';  | 
              
| 3685 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3685 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3686 | 3686 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3687 | 3687 | 
                  $dbi->execute($create_table1);  | 
              
| 3688 | 3688 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3701,7 +3701,7 @@ $rows = $dbi->select(  | 
              
| 3701 | 3701 | 
                  )->all;  | 
              
| 3702 | 3702 | 
                   is_deeply($rows, [{"${table1}_$key1" => 1, "${table2}_$key1" => 1, $key2 => 2, $key3 => 5}]);
                 | 
              
| 3703 | 3703 | 
                   | 
              
| 3704 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3704 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3705 | 3705 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3706 | 3706 | 
                  $dbi->execute($create_table1);  | 
              
| 3707 | 3707 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3756,7 +3756,7 @@ $rows = $dbi->select(  | 
              
| 3756 | 3756 | 
                  )->all;  | 
              
| 3757 | 3757 | 
                   is_deeply($rows, [{"${table1}__$key1" => 1}]);
                 | 
              
| 3758 | 3758 | 
                   | 
              
| 3759 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3759 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3760 | 3760 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3761 | 3761 | 
                  $dbi->execute($create_table1);  | 
              
| 3762 | 3762 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3773,7 +3773,7 @@ is_deeply($rows, [{"${table1}_$key1" => 1, "${table2}_$key1" => 1, $key2 => 2, $
                 | 
              
| 3773 | 3773 | 
                  'quote');  | 
              
| 3774 | 3774 | 
                   | 
              
| 3775 | 3775 | 
                   | 
              
| 3776 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3776 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3777 | 3777 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3778 | 3778 | 
                  $dbi->execute($create_table1);  | 
              
| 3779 | 3779 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3794,7 +3794,7 @@ $rows = $dbi->select(  | 
              
| 3794 | 3794 | 
                  )->all;  | 
              
| 3795 | 3795 | 
                   is_deeply($rows, [{"${table3}__$key1" => 1}]);
                 | 
              
| 3796 | 3796 | 
                   | 
              
| 3797 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3797 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3798 | 3798 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3799 | 3799 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 3800 | 3800 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -3826,7 +3826,7 @@ $result = $dbi->select(  | 
              
| 3826 | 3826 | 
                  );  | 
              
| 3827 | 3827 | 
                   is_deeply($result->all, [{"$table2.$key3" => 4}]);
                 | 
              
| 3828 | 3828 | 
                   | 
              
| 3829 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3829 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3830 | 3830 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3831 | 3831 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 3832 | 3832 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -3846,7 +3846,7 @@ $result = $dbi->select(  | 
              
| 3846 | 3846 | 
                  );  | 
              
| 3847 | 3847 | 
                   is_deeply($result->all, [{"$table2.$key3" => 4}]);
                 | 
              
| 3848 | 3848 | 
                   | 
              
| 3849 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3849 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3850 | 3850 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3851 | 3851 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 3852 | 3852 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -3863,7 +3863,7 @@ $result = $dbi->select(  | 
              
| 3863 | 3863 | 
                  );  | 
              
| 3864 | 3864 | 
                   is_deeply($result->all, [{"$table2.$key3" => 4}]);
                 | 
              
| 3865 | 3865 | 
                   | 
              
| 3866 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3866 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3867 | 3867 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3868 | 3868 | 
                   eval { $dbi->execute("drop table $table2") };
                 | 
              
| 3869 | 3869 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -3885,7 +3885,7 @@ $dbi = MyDBI1->connect;  | 
              
| 3885 | 3885 | 
                  $model = $dbi->model($table1);  | 
              
| 3886 | 3886 | 
                   | 
              
| 3887 | 3887 | 
                  test 'count';  | 
              
| 3888 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 3888 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 3889 | 3889 | 
                   eval { $dbi->execute("drop table $table1") };
                 | 
              
| 3890 | 3890 | 
                  $dbi->execute($create_table1);  | 
              
| 3891 | 3891 | 
                   $dbi->insert({$key1 => 1, $key2 => 2}, table => $table1);
                 | 
              
| ... | ... | 
                  @@ -3,7 +3,7 @@ package MyDBI1;  | 
              
| 3 | 3 | 
                  use strict;  | 
              
| 4 | 4 | 
                  use warnings;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 
                  -use base 'DBIx::Custom::Next';  | 
              |
| 6 | 
                  +use base 'DBIx::Custom';  | 
              |
| 7 | 7 | 
                   | 
              
| 8 | 8 | 
                   sub connect {
                 | 
              
| 9 | 9 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -1,6 +1,6 @@  | 
              
| 1 | 1 | 
                  package MyModel1::table1;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use DBIx::Custom::Next::Model -base;  | 
              |
| 3 | 
                  +use DBIx::Custom::Model -base;  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                   sub insert {
                 | 
              
| 6 | 6 | 
                  my ($self, $param) = @_;  | 
              
| ... | ... | 
                  @@ -3,7 +3,7 @@ package MyModel1::table2;  | 
              
| 3 | 3 | 
                  use strict;  | 
              
| 4 | 4 | 
                  use warnings;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 6 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 7 | 7 | 
                   | 
              
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                   sub insert {
                 | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel4;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel5;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel6;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel7;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,4 +1,4 @@  | 
              
| 1 | 1 | 
                  package MyModel8;  | 
              
| 2 | 
                  -use DBIx::Custom::Next::Model -base;  | 
              |
| 2 | 
                  +use DBIx::Custom::Model -base;  | 
              |
| 3 | 3 | 
                   | 
              
| 4 | 4 | 
                  1;  | 
              
| ... | ... | 
                  @@ -3,7 +3,7 @@ package MyDBI1;  | 
              
| 3 | 3 | 
                  use strict;  | 
              
| 4 | 4 | 
                  use warnings;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 
                  -use base 'DBIx::Custom::Next';  | 
              |
| 6 | 
                  +use base 'DBIx::Custom';  | 
              |
| 7 | 7 | 
                   | 
              
| 8 | 8 | 
                   sub connect {
                 | 
              
| 9 | 9 | 
                  my $self = shift->SUPER::connect(@_);  | 
              
| ... | ... | 
                  @@ -1,6 +1,6 @@  | 
              
| 1 | 1 | 
                  package MyModel1::TABLE1;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use DBIx::Custom::Next::Model -base;  | 
              |
| 3 | 
                  +use DBIx::Custom::Model -base;  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                   sub insert {
                 | 
              
| 6 | 6 | 
                  my ($self, $param) = @_;  | 
              
| ... | ... | 
                  @@ -3,7 +3,7 @@ package MyModel1::TABLE2;  | 
              
| 3 | 3 | 
                  use strict;  | 
              
| 4 | 4 | 
                  use warnings;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 6 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 7 | 7 | 
                   | 
              
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                   sub insert {
                 | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel4;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel5;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel6;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,5 +1,5 @@  | 
              
| 1 | 1 | 
                  package MyModel7;  | 
              
| 2 | 2 | 
                   | 
              
| 3 | 
                  -use base 'DBIx::Custom::Next::Model';  | 
              |
| 3 | 
                  +use base 'DBIx::Custom::Model';  | 
              |
| 4 | 4 | 
                   | 
              
| 5 | 5 | 
                  1;  | 
              
| ... | ... | 
                  @@ -1,4 +1,4 @@  | 
              
| 1 | 1 | 
                  package MyModel8;  | 
              
| 2 | 
                  -use DBIx::Custom::Next::Model -base;  | 
              |
| 2 | 
                  +use DBIx::Custom::Model -base;  | 
              |
| 3 | 3 | 
                   | 
              
| 4 | 4 | 
                  1;  | 
              
| ... | ... | 
                  @@ -4,7 +4,7 @@ use warnings;  | 
              
| 4 | 4 | 
                  use utf8;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 6 | 
                  use FindBin;  | 
              
| 7 | 
                  -use DBIx::Custom::Next;  | 
              |
| 7 | 
                  +use DBIx::Custom;  | 
              |
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                  my $dbi;  | 
              
| 10 | 10 | 
                  my $dsn;  | 
              
| ... | ... | 
                  @@ -17,7 +17,7 @@ $dsn = "dbi:mysql:database=$database";  | 
              
| 17 | 17 | 
                   $args = {dsn => $dsn, user => $user, password => $password,};
                 | 
              
| 18 | 18 | 
                   | 
              
| 19 | 19 | 
                  plan skip_all => 'mysql private test' unless -f "$FindBin::Bin/run/mysql2.run"  | 
              
| 20 | 
                  -  && eval { $dbi = DBIx::Custom::Next->connect($args); 1 };
                 | 
              |
| 20 | 
                  +  && eval { $dbi = DBIx::Custom->connect($args); 1 };
                 | 
              |
| 21 | 21 | 
                  plan 'no_plan';  | 
              
| 22 | 22 | 
                   | 
              
| 23 | 23 | 
                   $SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /DEPRECATED/};
                 | 
              
| ... | ... | 
                  @@ -36,7 +36,7 @@ my $model;  | 
              
| 36 | 36 | 
                   | 
              
| 37 | 37 | 
                  test 'connect';  | 
              
| 38 | 38 | 
                   eval {
                 | 
              
| 39 | 
                  - $dbi = DBIx::Custom::Next->connect(  | 
              |
| 39 | 
                  + $dbi = DBIx::Custom->connect(  | 
              |
| 40 | 40 | 
                  dsn => "dbi:mysql:database=$database;host=localhost;port=10000",  | 
              
| 41 | 41 | 
                  user => $user,  | 
              
| 42 | 42 | 
                  password => $password  | 
              
| ... | ... | 
                  @@ -109,7 +109,7 @@ is_deeply($row, {key1 => 1, key2 => 3}, "basic");
                 | 
              
| 109 | 109 | 
                   | 
              
| 110 | 110 | 
                  # Test memory leaks  | 
              
| 111 | 111 | 
                   for (1 .. 300) {
                 | 
              
| 112 | 
                  - $dbi = DBIx::Custom::Next->connect(  | 
              |
| 112 | 
                  + $dbi = DBIx::Custom->connect(  | 
              |
| 113 | 113 | 
                  dsn => "dbi:mysql:database=$database;host=localhost;port=10000",  | 
              
| 114 | 114 | 
                  user => $user,  | 
              
| 115 | 115 | 
                  password => $password  | 
              
| ... | ... | 
                  @@ -124,15 +124,15 @@ test 'dbh';  | 
              
| 124 | 124 | 
                  "dbi:mysql:database=$database",  | 
              
| 125 | 125 | 
                  $user,  | 
              
| 126 | 126 | 
                  $password,  | 
              
| 127 | 
                  - DBIx::Custom::Next->new->default_option  | 
              |
| 127 | 
                  + DBIx::Custom->new->default_option  | 
              |
| 128 | 128 | 
                  );  | 
              
| 129 | 129 | 
                   | 
              
| 130 | 
                  - my $dbi = DBIx::Custom::Next->connect(connector => $connector);  | 
              |
| 130 | 
                  + my $dbi = DBIx::Custom->connect(connector => $connector);  | 
              |
| 131 | 131 | 
                  $dbi->delete_all(table => 'table1');  | 
              
| 132 | 132 | 
                       $dbi->do('insert into table1 (key1, key2) values (1, 2)');
                 | 
              
| 133 | 133 | 
                       is($dbi->select(table => 'table1')->fetch_hash_first->{key1}, 1);
                 | 
              
| 134 | 134 | 
                   | 
              
| 135 | 
                  - $dbi = DBIx::Custom::Next->new;  | 
              |
| 135 | 
                  + $dbi = DBIx::Custom->new;  | 
              |
| 136 | 136 | 
                       $dbi->dbh('a');
                 | 
              
| 137 | 137 | 
                       is($dbi->{dbh}, 'a');
                 | 
              
| 138 | 138 | 
                  }  | 
              
| ... | ... | 
                  @@ -144,10 +144,10 @@ test 'dbh';  | 
              
| 144 | 144 | 
                  "dbi:mysql:database=$database",  | 
              
| 145 | 145 | 
                  $user,  | 
              
| 146 | 146 | 
                  $password,  | 
              
| 147 | 
                  - DBIx::Custom::Next->new->default_option  | 
              |
| 147 | 
                  + DBIx::Custom->new->default_option  | 
              |
| 148 | 148 | 
                  );  | 
              
| 149 | 149 | 
                   | 
              
| 150 | 
                  - my $dbi = DBIx::Custom::Next->connect(connector => $connector);  | 
              |
| 150 | 
                  + my $dbi = DBIx::Custom->connect(connector => $connector);  | 
              |
| 151 | 151 | 
                  $dbi->delete_all(table => 'table1');  | 
              
| 152 | 152 | 
                   | 
              
| 153 | 153 | 
                       $dbi->connector->txn(sub {
                 | 
              
| ... | ... | 
                  @@ -169,10 +169,10 @@ test 'dbh';  | 
              
| 169 | 169 | 
                  []);  | 
              
| 170 | 170 | 
                  }  | 
              
| 171 | 171 | 
                   | 
              
| 172 | 
                  -use DBIx::Custom::Next;  | 
              |
| 172 | 
                  +use DBIx::Custom;  | 
              |
| 173 | 173 | 
                  use Scalar::Util 'blessed';  | 
              
| 174 | 174 | 
                   {
                 | 
              
| 175 | 
                  - my $dbi = DBIx::Custom::Next->connect(  | 
              |
| 175 | 
                  + my $dbi = DBIx::Custom->connect(  | 
              |
| 176 | 176 | 
                  user => $user,  | 
              
| 177 | 177 | 
                  password => $password,  | 
              
| 178 | 178 | 
                  dsn => "dbi:mysql:dbname=$database"  | 
              
| ... | ... | 
                  @@ -186,7 +186,7 @@ use Scalar::Util 'blessed';  | 
              
| 186 | 186 | 
                  }  | 
              
| 187 | 187 | 
                   | 
              
| 188 | 188 | 
                   {
                 | 
              
| 189 | 
                  - my $dbi = DBIx::Custom::Next->connect(  | 
              |
| 189 | 
                  + my $dbi = DBIx::Custom->connect(  | 
              |
| 190 | 190 | 
                  user => $user,  | 
              
| 191 | 191 | 
                  password => $password,  | 
              
| 192 | 192 | 
                  dsn => "dbi:mysql:dbname=$database",  | 
              
| ... | ... | 
                  @@ -203,10 +203,10 @@ test 'fork';  | 
              
| 203 | 203 | 
                  "dbi:mysql:database=$database",  | 
              
| 204 | 204 | 
                  $user,  | 
              
| 205 | 205 | 
                  $password,  | 
              
| 206 | 
                  - DBIx::Custom::Next->new->default_option  | 
              |
| 206 | 
                  + DBIx::Custom->new->default_option  | 
              |
| 207 | 207 | 
                  );  | 
              
| 208 | 208 | 
                   | 
              
| 209 | 
                  - my $dbi = DBIx::Custom::Next->new(connector => $connector);  | 
              |
| 209 | 
                  + my $dbi = DBIx::Custom->new(connector => $connector);  | 
              |
| 210 | 210 | 
                  $dbi->delete_all(table => 'table1');  | 
              
| 211 | 211 | 
                       $dbi->insert({key1 => 1, key2 => 2}, table => 'table1');
                 | 
              
| 212 | 212 | 
                  die "Can't fork" unless defined (my $pid = fork);  | 
              
| ... | ... | 
                  @@ -4,7 +4,7 @@ use warnings;  | 
              
| 4 | 4 | 
                  use utf8;  | 
              
| 5 | 5 | 
                   | 
              
| 6 | 6 | 
                  use FindBin;  | 
              
| 7 | 
                  -use DBIx::Custom::Next;  | 
              |
| 7 | 
                  +use DBIx::Custom;  | 
              |
| 8 | 8 | 
                   | 
              
| 9 | 9 | 
                  my $dbi;  | 
              
| 10 | 10 | 
                  my $dsn;  | 
              
| ... | ... | 
                  @@ -17,7 +17,7 @@ $dsn = "dbi:mysql:database=$database";  | 
              
| 17 | 17 | 
                   $args = {dsn => $dsn, user => $user, password => $password,};
                 | 
              
| 18 | 18 | 
                   | 
              
| 19 | 19 | 
                  plan skip_all => 'mysql private test' unless -f "$FindBin::Bin/run/mysql2.run"  | 
              
| 20 | 
                  -  && eval { $dbi = DBIx::Custom::Next->connect($args); 1 };
                 | 
              |
| 20 | 
                  +  && eval { $dbi = DBIx::Custom->connect($args); 1 };
                 | 
              |
| 21 | 21 | 
                  plan 'no_plan';  | 
              
| 22 | 22 | 
                   | 
              
| 23 | 23 | 
                   $SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /DEPRECATED/};
                 | 
              
| ... | ... | 
                  @@ -33,7 +33,7 @@ my $dbname;  | 
              
| 33 | 33 | 
                  my $rows;  | 
              
| 34 | 34 | 
                  my $result;  | 
              
| 35 | 35 | 
                   | 
              
| 36 | 
                  -$dbi = DBIx::Custom::Next->connect(  | 
              |
| 36 | 
                  +$dbi = DBIx::Custom->connect(  | 
              |
| 37 | 37 | 
                  dsn => "dbi:mysql:database=$database",  | 
              
| 38 | 38 | 
                  user => $user,  | 
              
| 39 | 39 | 
                  password => $password  | 
              
| ... | ... | 
                  @@ -43,7 +43,7 @@ $dbi->execute('create table table1 (key1 varchar(255), key2 varchar(255))');
                 | 
              
| 43 | 43 | 
                   | 
              
| 44 | 44 | 
                  test 'connector => 1';  | 
              
| 45 | 45 | 
                   {
                 | 
              
| 46 | 
                  - my $dbi = DBIx::Custom::Next->connect(dsn => $dsn, user => $user, password => $password,  | 
              |
| 46 | 
                  + my $dbi = DBIx::Custom->connect(dsn => $dsn, user => $user, password => $password,  | 
              |
| 47 | 47 | 
                         option => {PrintError => 1}, connector => 1);
                 | 
              
| 48 | 48 | 
                  is(ref $dbi->connector, 'DBIx::Connector');  | 
              
| 49 | 49 | 
                       ok($dbi->dbh->{PrintError});
                 | 
              
| ... | ... | 
                  @@ -1,7 +1,7 @@  | 
              
| 1 | 1 | 
                  # Change quote for tests  | 
              
| 2 | 
                  -use DBIx::Custom::Next;  | 
              |
| 2 | 
                  +use DBIx::Custom;  | 
              |
| 3 | 3 | 
                   {
                 | 
              
| 4 | 
                  - package DBIx::Custom::Next;  | 
              |
| 4 | 
                  + package DBIx::Custom;  | 
              |
| 5 | 5 | 
                  no warnings 'redefine';  | 
              
| 6 | 6 | 
                       sub quote { '""' }
                 | 
              
| 7 | 7 | 
                  }  | 
              
| ... | ... | 
                  @@ -13,15 +13,15 @@ BEGIN {
                 | 
              
| 13 | 13 | 
                  or plan skip_all => 'DBD::SQLite >= 1.25 required';  | 
              
| 14 | 14 | 
                   | 
              
| 15 | 15 | 
                  plan 'no_plan';  | 
              
| 16 | 
                  -    use_ok('DBIx::Custom::Next');
                 | 
              |
| 16 | 
                  +    use_ok('DBIx::Custom');
                 | 
              |
| 17 | 17 | 
                  }  | 
              
| 18 | 18 | 
                   | 
              
| 19 | 19 | 
                   $SIG{__WARN__} = sub { warn $_[0] unless $_[0] =~ /DEPRECATED/};
                 | 
              
| 20 | 20 | 
                   sub test { print "# $_[0]\n" }
                 | 
              
| 21 | 21 | 
                   | 
              
| 22 | 
                  -use DBIx::Custom::Next;  | 
              |
| 22 | 
                  +use DBIx::Custom;  | 
              |
| 23 | 23 | 
                   {
                 | 
              
| 24 | 
                  - package DBIx::Custom::Next;  | 
              |
| 24 | 
                  + package DBIx::Custom;  | 
              |
| 25 | 25 | 
                       has dsn => sub { 'dbi:SQLite:dbname=:memory:' }
                 | 
              
| 26 | 26 | 
                  }  | 
              
| 27 | 27 | 
                   | 
              
| ... | ... | 
                  @@ -40,17 +40,17 @@ my $binary;  | 
              
| 40 | 40 | 
                  my $model;  | 
              
| 41 | 41 | 
                   | 
              
| 42 | 42 | 
                  # Prepare table  | 
              
| 43 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 43 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 44 | 44 | 
                   | 
              
| 45 | 45 | 
                   | 
              
| 46 | 46 | 
                  ### SQLite only test  | 
              
| 47 | 47 | 
                  test 'option default';  | 
              
| 48 | 
                  -$dbi = DBIx::Custom::Next->new;  | 
              |
| 48 | 
                  +$dbi = DBIx::Custom->new;  | 
              |
| 49 | 49 | 
                   is_deeply($dbi->option, {});
                 | 
              
| 50 | 50 | 
                   | 
              
| 51 | 51 | 
                   | 
              
| 52 | 52 | 
                  test 'prefix';  | 
              
| 53 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 53 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 54 | 54 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 55 | 55 | 
                   $dbi->execute('create table table1 (key1 varchar, key2 varchar, primary key(key1));');
                 | 
              
| 56 | 56 | 
                   $dbi->insert({key1 => 1, key2 => 2}, table => 'table1');
                 | 
              
| ... | ... | 
                  @@ -61,7 +61,7 @@ is_deeply($rows, [{key1 => 1, key2 => 4}], "basic");
                 | 
              
| 61 | 61 | 
                   | 
              
| 62 | 62 | 
                   | 
              
| 63 | 63 | 
                  test 'insert created_at and updated_at scalar reference';  | 
              
| 64 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 64 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 65 | 65 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 66 | 66 | 
                   $dbi->execute('create table table1 (key1, key2, key3)');
                 | 
              
| 67 | 67 | 
                   $dbi->now(\"datetime('now')");
                 | 
              
| ... | ... | 
                  @@ -71,7 +71,7 @@ $row = $result->one;  | 
              
| 71 | 71 | 
                   is($row->{key1}, $row->{key2});
                 | 
              
| 72 | 72 | 
                   is($row->{key1}, $row->{key3});
                 | 
              
| 73 | 73 | 
                   | 
              
| 74 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 74 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 75 | 75 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 76 | 76 | 
                   $dbi->execute('create table table1 (key1, key2, key3)');
                 | 
              
| 77 | 77 | 
                   $dbi->now(\"datetime('now')");
                 | 
              
| ... | ... | 
                  @@ -83,7 +83,7 @@ is($row->{key1}, $row->{key2});
                 | 
              
| 83 | 83 | 
                   is($row->{key1}, $row->{key3});
                 | 
              
| 84 | 84 | 
                   | 
              
| 85 | 85 | 
                  test 'insert created_at and updated_at scalar reference';  | 
              
| 86 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 86 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 87 | 87 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 88 | 88 | 
                   $dbi->execute('create table table1 (key1, key2, key3)');
                 | 
              
| 89 | 89 | 
                   $dbi->now(\"datetime('now')");
                 | 
              
| ... | ... | 
                  @@ -94,7 +94,7 @@ is($row->{key1}, $row->{key2});
                 | 
              
| 94 | 94 | 
                   is($row->{key1}, $row->{key3});
                 | 
              
| 95 | 95 | 
                   | 
              
| 96 | 96 | 
                  test 'update updated_at scalar reference';  | 
              
| 97 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 97 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 98 | 98 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 99 | 99 | 
                   $dbi->execute('create table table1 (key1, key2)');
                 | 
              
| 100 | 100 | 
                   $dbi->now(\"datetime('now')");
                 | 
              
| ... | ... | 
                  @@ -115,7 +115,7 @@ $row = $result->one;  | 
              
| 115 | 115 | 
                   is($row->{key1}, $row->{key2});
                 | 
              
| 116 | 116 | 
                   is($row->{key1}, $row->{key3});
                 | 
              
| 117 | 117 | 
                   | 
              
| 118 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 118 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 119 | 119 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 120 | 120 | 
                   $dbi->execute('create table table1 (key1, key2)');
                 | 
              
| 121 | 121 | 
                   $dbi->now(\"datetime('now')");
                 | 
              
| ... | ... | 
                  @@ -128,7 +128,7 @@ is($row->{key1}, $row->{key2});
                 | 
              
| 128 | 128 | 
                  test 'DBIX_CUSTOM_DEBUG ok';  | 
              
| 129 | 129 | 
                   {
                 | 
              
| 130 | 130 | 
                       local $ENV{DBIX_CUSTOM_DEBUG} = 1;
                 | 
              
| 131 | 
                  - $dbi = DBIx::Custom::Next->connect;  | 
              |
| 131 | 
                  + $dbi = DBIx::Custom->connect;  | 
              |
| 132 | 132 | 
                       eval { $dbi->execute('drop table table1') };
                 | 
              
| 133 | 133 | 
                  my $error;  | 
              
| 134 | 134 | 
                       local $SIG{__WARN__} = sub {
                 | 
              
| ... | ... | 
                  @@ -139,7 +139,7 @@ test 'DBIX_CUSTOM_DEBUG ok';  | 
              
| 139 | 139 | 
                  }  | 
              
| 140 | 140 | 
                   | 
              
| 141 | 141 | 
                  test 'quote';  | 
              
| 142 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 142 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 143 | 143 | 
                   $dbi->quote('"');
                 | 
              
| 144 | 144 | 
                   eval { $dbi->execute("drop table ${q}table$p") };
                 | 
              
| 145 | 145 | 
                  $dbi->execute($create_table_quote);  | 
              
| ... | ... | 
                  @@ -150,7 +150,7 @@ $rows = $result->all;  | 
              
| 150 | 150 | 
                  is_deeply($rows, [], "quote");  | 
              
| 151 | 151 | 
                   | 
              
| 152 | 152 | 
                  test 'finish statement handle';  | 
              
| 153 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 153 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 154 | 154 | 
                  $dbi->execute($create_table1);  | 
              
| 155 | 155 | 
                   $dbi->insert({key1 => 1, key2 => 2}, table => 'table1');
                 | 
              
| 156 | 156 | 
                   $dbi->insert({key1 => 3, key2 => 4}, table => 'table1');
                 | 
              
| ... | ... | 
                  @@ -172,7 +172,7 @@ $result = $dbi->select(table => 'table2');  | 
              
| 172 | 172 | 
                  $row = $result->fetch_hash_first;  | 
              
| 173 | 173 | 
                  ok(!$row, "no row fetch");  | 
              
| 174 | 174 | 
                   | 
              
| 175 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 175 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 176 | 176 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 177 | 177 | 
                  $dbi->execute($create_table1);  | 
              
| 178 | 178 | 
                   $dbi->insert({key1 => 1, key2 => 2}, table => 'table1');
                 | 
              
| ... | ... | 
                  @@ -214,7 +214,7 @@ like($@, qr/Row count must be specified/, "Not specified row count");  | 
              
| 214 | 214 | 
                   | 
              
| 215 | 215 | 
                  test 'bind_type option';  | 
              
| 216 | 216 | 
                   $binary = pack("I3", 1, 2, 3);
                 | 
              
| 217 | 
                  -$dbi = DBIx::Custom::Next->connect(option => {sqlite_unicode => 1});
                 | 
              |
| 217 | 
                  +$dbi = DBIx::Custom->connect(option => {sqlite_unicode => 1});
                 | 
              |
| 218 | 218 | 
                   $dbi->execute('create table table1(key1, key2)');
                 | 
              
| 219 | 219 | 
                   $dbi->insert({key1 => $binary, key2 => 'あ'}, table => 'table1', bind_type => [key1 => DBI::SQL_BLOB]);
                 | 
              
| 220 | 220 | 
                  $result = $dbi->select(table => 'table1');  | 
              
| ... | ... | 
                  @@ -225,7 +225,7 @@ $row = $result->one;  | 
              
| 225 | 225 | 
                   is($row->{key1_length}, length $binary);
                 | 
              
| 226 | 226 | 
                   | 
              
| 227 | 227 | 
                  test 'type_rule from';  | 
              
| 228 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 228 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 229 | 229 | 
                  $dbi->type_rule(  | 
              
| 230 | 230 | 
                       from1 => {
                 | 
              
| 231 | 231 | 
                           date => sub { uc $_[0] }
                 | 
              
| ... | ... | 
                  @@ -251,7 +251,7 @@ is_deeply($rows, [{key1 => 3, key2 => 4}], "append statement");
                 | 
              
| 251 | 251 | 
                   | 
              
| 252 | 252 | 
                  # DEPRECATED! test  | 
              
| 253 | 253 | 
                  test 'filter __ expression';  | 
              
| 254 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 254 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 255 | 255 | 
                   eval { $dbi->execute('drop table table2') };
                 | 
              
| 256 | 256 | 
                   eval { $dbi->execute('drop table table3') };
                 | 
              
| 257 | 257 | 
                   $dbi->execute('create table table2 (id, name, table3_id)');
                 | 
              
| ... | ... | 
                  @@ -282,7 +282,7 @@ $result = $dbi->select(  | 
              
| 282 | 282 | 
                  is($result->fetch_first->[0], 'b');  | 
              
| 283 | 283 | 
                   | 
              
| 284 | 284 | 
                  test 'quote';  | 
              
| 285 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 285 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 286 | 286 | 
                   eval { $dbi->execute("drop table ${q}table$p") };
                 | 
              
| 287 | 287 | 
                   $dbi->quote('"');
                 | 
              
| 288 | 288 | 
                  $dbi->execute($create_table_quote);  | 
              
| ... | ... | 
                  @@ -293,7 +293,7 @@ $rows = $result->all;  | 
              
| 293 | 293 | 
                   is_deeply($rows, [{select => 1, update => 2}]);
                 | 
              
| 294 | 294 | 
                   | 
              
| 295 | 295 | 
                  test 'join function';  | 
              
| 296 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 296 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 297 | 297 | 
                   eval { $dbi->execute("drop table table1") };
                 | 
              
| 298 | 298 | 
                   eval { $dbi->execute("drop table table2") };
                 | 
              
| 299 | 299 | 
                  $dbi->execute($create_table1);  | 
              
| ... | ... | 
                  @@ -310,7 +310,7 @@ $result = $dbi->select(  | 
              
| 310 | 310 | 
                  );  | 
              
| 311 | 311 | 
                   is_deeply($result->all, [{"table2.key3" => 4}]);
                 | 
              
| 312 | 312 | 
                   | 
              
| 313 | 
                  -$dbi = DBIx::Custom::Next->connect;  | 
              |
| 313 | 
                  +$dbi = DBIx::Custom->connect;  | 
              |
| 314 | 314 | 
                   eval { $dbi->execute("drop table table1") };
                 | 
              
| 315 | 315 | 
                   eval { $dbi->execute("drop table table2") };
                 | 
              
| 316 | 316 | 
                  $dbi->execute($create_table1);  |