Showing 1 changed files with 19 additions and 0 deletions
+19
t/common.t
... ...
@@ -462,6 +462,14 @@ $result = $dbi->execute("select * from $table1");
462 462
 $rows   = $result->all;
463 463
 is_deeply($rows, [{$key1 => 1, $key2 => 2}, {$key1 => 3, $key2 => 4}], "basic");
464 464
 
465
+eval { $dbi->execute("drop table $table1") };
466
+$dbi->execute($create_table1);
467
+$dbi->insert(table => $table1, param => {$key1 => 1, $key2 => 2});
468
+$dbi->insert({$key1 => 3, $key2 => 4}, table => $table1);
469
+$result = $dbi->execute("select * from $table1");
470
+$rows   = $result->all;
471
+is_deeply($rows, [{$key1 => 1, $key2 => 2}, {$key1 => 3, $key2 => 4}], "basic");
472
+
465 473
 $dbi->execute("delete from $table1");
466 474
 $dbi->register_filter(
467 475
     twice       => sub { $_[0] * 2 },
... ...
@@ -678,6 +686,17 @@ $rows   = $result->all;
678 686
 is_deeply($rows, [{$key1 => 1, $key2 => 11, $key3 => 3, $key4 => 4, $key5 => 5},
679 687
                   {$key1 => 6, $key2 => 7,  $key3 => 8, $key4 => 9, $key5 => 10}],
680 688
                   "basic");
689
+
690
+eval { $dbi->execute("drop table $table1") };
691
+$dbi->execute($create_table1_2);
692
+$dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3, $key4 => 4, $key5 => 5}, table => $table1);
693
+$dbi->insert({$key1 => 6, $key2 => 7, $key3 => 8, $key4 => 9, $key5 => 10}, table => $table1);
694
+$dbi->update(param => {$key2 => 11}, table => $table1, where => {$key1 => 1});
695
+$result = $dbi->execute("select * from $table1 order by $key1");
696
+$rows   = $result->all;
697
+is_deeply($rows, [{$key1 => 1, $key2 => 11, $key3 => 3, $key4 => 4, $key5 => 5},
698
+                  {$key1 => 6, $key2 => 7,  $key3 => 8, $key4 => 9, $key5 => 10}],
699
+                  "basic");
681 700
                   
682 701
 $dbi->execute("delete from $table1");
683 702
 $dbi->insert({$key1 => 1, $key2 => 2, $key3 => 3, $key4 => 4, $key5 => 5}, table => $table1);