|
Lines 579-585
subtest 'Return same values as DBIx::Class' => sub {
Link Here
|
| 579 |
|
579 |
|
| 580 |
subtest 'Koha::Objects->delete' => sub { |
580 |
subtest 'Koha::Objects->delete' => sub { |
| 581 |
|
581 |
|
| 582 |
plan tests => 9; |
582 |
plan tests => 7; |
| 583 |
|
583 |
|
| 584 |
my ( $r_us, $e_us, $r_them, $e_them ); |
584 |
my ( $r_us, $e_us, $r_them, $e_them ); |
| 585 |
|
585 |
|
|
Lines 687-697
subtest 'Return same values as DBIx::Class' => sub {
Link Here
|
| 687 |
} |
687 |
} |
| 688 |
); |
688 |
); |
| 689 |
|
689 |
|
| 690 |
warning_like { |
690 |
try { $r_us = $patrons->delete; } catch { $e_us = $_ }; |
| 691 |
try { $r_us = $patrons->delete; } catch { $e_us = $_ }; |
|
|
| 692 |
} |
| 693 |
qr{DBD::mysql::st execute failed: Cannot delete or update a parent row: a foreign key constraint fails}, |
| 694 |
"Foreign key constraint DBI error should be logged"; |
| 695 |
my $not_deleted_us = $patron_1->in_storage + $patron_2->in_storage + $patron_3->in_storage; |
691 |
my $not_deleted_us = $patron_1->in_storage + $patron_2->in_storage + $patron_3->in_storage; |
| 696 |
|
692 |
|
| 697 |
$patron_1 = $builder->build_object({ class => 'Koha::Patrons' }); |
693 |
$patron_1 = $builder->build_object({ class => 'Koha::Patrons' }); |
|
Lines 717-727
subtest 'Return same values as DBIx::Class' => sub {
Link Here
|
| 717 |
} |
713 |
} |
| 718 |
); |
714 |
); |
| 719 |
|
715 |
|
| 720 |
warning_like { |
716 |
try { $r_them = $patrons->delete; } catch { $e_them = $_ }; |
| 721 |
try { $r_them = $patrons->delete; } catch { $e_them = $_ }; |
|
|
| 722 |
} |
| 723 |
qr{DBD::mysql::st execute failed: Cannot delete or update a parent row: a foreign key constraint fails}, |
| 724 |
"Foreign key constraint DBI error should be logged"; |
| 725 |
|
717 |
|
| 726 |
my $not_deleted_them = $patron_1->in_storage + $patron_2->in_storage + $patron_3->in_storage; |
718 |
my $not_deleted_them = $patron_1->in_storage + $patron_2->in_storage + $patron_3->in_storage; |
| 727 |
ok( |
719 |
ok( |
| 728 |
- |
|
|