| ... | ... | 
                  @@ -205,7 +205,6 @@ $dbi->type_rule(  | 
              
| 205 | 205 | 
                           $date_typename => sub { '2010-' . $_[0] }
                 | 
              
| 206 | 206 | 
                  }  | 
              
| 207 | 207 | 
                  );  | 
              
| 208 | 
                  -$DB::single = 1;  | 
              |
| 209 | 208 | 
                   $dbi->insert({key1 => '01-01'}, table => 'table1');
                 | 
              
| 210 | 209 | 
                  $result = $dbi->select(table => 'table1');  | 
              
| 211 | 210 | 
                   like($result->one->{key1}, qr/^2010-01-01/);
                 | 
              
| ... | ... | 
                  @@ -213,7 +212,6 @@ like($result->one->{key1}, qr/^2010-01-01/);
                 | 
              
| 213 | 212 | 
                  $dbi = DBIx::Custom->connect;  | 
              
| 214 | 213 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 215 | 214 | 
                  $dbi->execute($create_table1_type);  | 
              
| 216 | 
                  -$DB::single = 1;  | 
              |
| 217 | 215 | 
                  $dbi->type_rule(  | 
              
| 218 | 216 | 
                  into1 => [  | 
              
| 219 | 217 | 
                            [$date_typename, $datetime_typename] => sub {
                 | 
              
| ... | ... | 
                  @@ -1198,23 +1196,28 @@ test 'transaction1';  | 
              
| 1198 | 1196 | 
                  $dbi = DBIx::Custom->connect;  | 
              
| 1199 | 1197 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 1200 | 1198 | 
                  $dbi->execute($create_table1);  | 
              
| 1201 | 
                  -$dbi->dbh->begin_work;  | 
              |
| 1199 | 
                  +$dbi->begin_work;  | 
              |
| 1200 | 
                  +$dbi->dbh->{AutoCommit} = 0;
                 | 
              |
| 1202 | 1201 | 
                   $dbi->insert(table => 'table1', param => {key1 => 1, key2 => 2});
                 | 
              
| 1203 | 
                  -$dbi->insert(table => 'table1', param => {key1 => 2, key2 => 3});
                 | 
              |
| 1204 | 
                  -$dbi->dbh->commit;  | 
              |
| 1202 | 
                  +$dbi->rollback;  | 
              |
| 1203 | 
                  +$dbi->dbh->{AutoCommit} = 1;
                 | 
              |
| 1204 | 
                  +  | 
              |
| 1205 | 1205 | 
                  $result = $dbi->select(table => 'table1');  | 
              
| 1206 | 
                  -is_deeply(scalar $result->all, [{key1 => 1, key2 => 2}, {key1 => 2, key2 => 3}],
                 | 
              |
| 1207 | 
                  - "commit");  | 
              |
| 1206 | 
                  +ok(! $result->fetch_first, "rollback");  | 
              |
| 1207 | 
                  +  | 
              |
| 1208 | 1208 | 
                   | 
              
| 1209 | 1209 | 
                  $dbi = DBIx::Custom->connect;  | 
              
| 1210 | 1210 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| 1211 | 1211 | 
                  $dbi->execute($create_table1);  | 
              
| 1212 | 
                  -$dbi->dbh->begin_work(0);  | 
              |
| 1212 | 
                  +$dbi->begin_work;  | 
              |
| 1213 | 
                  +$dbi->dbh->{AutoCommit} = 0;
                 | 
              |
| 1213 | 1214 | 
                   $dbi->insert(table => 'table1', param => {key1 => 1, key2 => 2});
                 | 
              
| 1214 | 
                  -$dbi->dbh->rollback;  | 
              |
| 1215 | 
                  -  | 
              |
| 1215 | 
                  +$dbi->insert(table => 'table1', param => {key1 => 2, key2 => 3});
                 | 
              |
| 1216 | 
                  +$dbi->commit;  | 
              |
| 1217 | 
                  +$dbi->dbh->{AutoCommit} = 1;
                 | 
              |
| 1216 | 1218 | 
                  $result = $dbi->select(table => 'table1');  | 
              
| 1217 | 
                  -ok(! $result->fetch_first, "rollback");  | 
              |
| 1219 | 
                  +is_deeply(scalar $result->all, [{key1 => 1, key2 => 2}, {key1 => 2, key2 => 3}],
                 | 
              |
| 1220 | 
                  + "commit");  | 
              |
| 1218 | 1221 | 
                   | 
              
| 1219 | 1222 | 
                  test 'execute';  | 
              
| 1220 | 1223 | 
                   eval { $dbi->execute('drop table table1') };
                 | 
              
| ... | ... | 
                  @@ -3097,7 +3100,6 @@ is_deeply($result->all, [{'table1-key1' => 1, 'table1-key2' => 3},
                 | 
              
| 3097 | 3100 | 
                     {'table1-key1' => 2, 'table1-key2' => 2}]);
                 | 
              
| 3098 | 3101 | 
                   | 
              
| 3099 | 3102 | 
                  test 'tag_parse';  | 
              
| 3100 | 
                  -$DB::single = 1;  | 
              |
| 3101 | 3103 | 
                  $dbi = DBIx::Custom->connect;  | 
              
| 3102 | 3104 | 
                  $dbi->tag_parse(0);  | 
              
| 3103 | 3105 | 
                   eval { $dbi->execute('drop table table1') };
                 |