|
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 |
- |
|
|