Lines 846-852
subtest 'delete() tests' => sub {
Link Here
|
846 |
$builder->build_object( { class => 'Koha::Cities' } ); |
846 |
$builder->build_object( { class => 'Koha::Cities' } ); |
847 |
$builder->build_object( { class => 'Koha::Cities' } ); |
847 |
$builder->build_object( { class => 'Koha::Cities' } ); |
848 |
|
848 |
|
849 |
warnings_are { Koha::Cities->delete } |
849 |
my $cities = Koha::Cities->search; |
|
|
850 |
$cities->next; |
851 |
warnings_are { $cities->delete } |
850 |
[ "delete called!", "delete called!" ], |
852 |
[ "delete called!", "delete called!" ], |
851 |
"No warnings, no Koha::City->delete called as it doesn't exist"; |
853 |
"No warnings, no Koha::City->delete called as it doesn't exist"; |
852 |
|
854 |
|
853 |
- |
|
|