|
Lines 21-29
use Modern::Perl;
Link Here
|
| 21 |
use Test::More tests => 4; |
21 |
use Test::More tests => 4; |
| 22 |
use Koha::City; |
22 |
use Koha::City; |
| 23 |
use Koha::Cities; |
23 |
use Koha::Cities; |
| 24 |
use t::lib::TestBuilder; |
|
|
| 25 |
|
24 |
|
| 26 |
my $builder = t::lib::TestBuilder->new; |
|
|
| 27 |
my $nb_of_cities = Koha::Cities->search->count; |
25 |
my $nb_of_cities = Koha::Cities->search->count; |
| 28 |
my $new_city_1 = Koha::City->new({ |
26 |
my $new_city_1 = Koha::City->new({ |
| 29 |
city_name => 'my_city_name_for_test_1', |
27 |
city_name => 'my_city_name_for_test_1', |
| 30 |
- |
|
|